login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A033930 Base 10 digital convolution sequence. 2
1, 1, 2, 3, 4, 5, 6, 7, 8, 9, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 8, 9, 10, 11, 12, 13, 14 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

COMMENTS

Differs from A007953 at n=0, 101-109, 111-119 etc. [R. J. Mathar, Oct 20 2008]

LINKS

Indranil Ghosh, Table of n, a(n) for n = 0..10000

FORMULA

For example, a(837) = 8*a(2)+3*a(1)+7*a(0).

MATHEMATICA

a = {1}; Do[AppendTo[a, ListConvolve[Reverse@ Take[a, Length@ #], #][[1]] &@ IntegerDigits@ n], {n, 10^3}]; a (* Michael De Vlieger, Feb 12 2017 *)

PROG

(PARI) a(n) = if (!n, 1, my(d = digits(n)); sum(i=1, #d, d[i]*a(#d-i))); \\ Michel Marcus, Sep 13 2014

CROSSREFS

Sequence in context: A177274 A131650 * A076314 A007953 A080463 A209685

Adjacent sequences:  A033927 A033928 A033929 * A033931 A033932 A033933

KEYWORD

nonn,base

AUTHOR

David W. Wilson

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified February 21 04:43 EST 2018. Contains 299389 sequences. (Running on oeis4.)