

A107974


First differences give the same sequence written as a string of individual digits.


5



3, 6, 12, 13, 15, 16, 19, 20, 25, 26, 32, 33, 42, 44, 44, 46, 51, 53, 59, 62, 64, 67, 70, 74, 76, 80, 84, 88, 92, 96, 102, 107, 108, 113, 116, 121, 130, 136, 138, 144, 148, 154, 161, 168, 168, 175, 179, 186, 192, 200, 200, 208, 212, 220, 228, 237, 239, 248, 254, 255
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

Table of n, a(n) for n=1..60.


EXAMPLE

3.6.12.13.15.16.19.20.25 ... < sequence
.3.6..1..2..1..3..1..5 ... < first differences are the sequence's digits.


MATHEMATICA

a[1] = 3; a[n_] := a[n] = a[n  1] + Flatten[ Table[ IntegerDigits[ a[i]], {i, n  1}]][[n  1]]; Table[ a[n], {n, 60}] (* Robert G. Wilson v, Jun 15 2005 *)


CROSSREFS

Cf. A100787, A107974, A107975, A107976, A107977 for "seeds" 1, 3, 5, 7 and 9.
Sequence in context: A038587 A090553 A078502 * A116625 A287560 A062053
Adjacent sequences: A107971 A107972 A107973 * A107975 A107976 A107977


KEYWORD

base,easy,nonn


AUTHOR

Eric Angelini, Jun 12 2005


EXTENSIONS

Edited and extended by Robert G. Wilson v, Jun 15 2005


STATUS

approved



