%I A033667
%S A033667 1,1,2,1,2,3,2,3,4,1,3,5,2,4,6,3,5,7,2,4,6,3,5,7,4,6,8,1,2,3,3,4,5,5,6,
%T A033667 7,2,3,4,4,5,6,6,7,8,3,4,5,5,6,7,7,8,9,2,3,4,4,5,6,6,7,8,3,4,5,5,6,7,7,
%U A033667 8,9,4,5,6,6,7,8,8,9,10,1,3,5,2,4,6,3,5,7,3,5,7,4,6,8,5,7,9,5,7,9
%N A033667 Base 3 digital convolution sequence, (with smallest digits).
%H A033667 Michael Gilleland, <a href="selfsimilar.html">Some Self-Similar Integer 
               Sequences</a>
%t A033667 c[ 0, _ ] := 1; c[ n_, b_ ] := c[ n, b ]=Module[ {mul}, mul=IntegerDigits[ 
               n, b ]; Table[ c[ i, b ], {i, 0, Length[ mul ]-1} ].mul ]
%Y A033667 Sequence in context: A147844 A130634 A053735 this_sequence A033923 A116939 
               A008611
%Y A033667 Adjacent sequences: A033664 A033665 A033666 this_sequence A033668 A033669 
               A033670
%K A033667 nonn
%O A033667 0,3
%A A033667 David W. Wilson (davidwwilson(AT)comcast.net), Wouter Meeussen (wouter.meeussen(AT)pandora.be)