

A107975


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


5



5, 10, 11, 11, 12, 13, 14, 15, 16, 18, 19, 22, 23, 27, 28, 33, 34, 40, 41, 49, 50, 59, 61, 63, 65, 68, 70, 77, 79, 87, 90, 93, 96, 100, 104, 104, 108, 109, 113, 122, 127, 127, 132, 141, 147, 148, 154, 157, 163, 168, 174, 182, 189, 189, 196, 203, 210, 219, 227, 234, 243
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

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


EXAMPLE

5.10.11.11.12.13.14.15.16.18 ... < sequence
.5..1..0..1..1..1..1..1..2 ... < first differences are the sequence's digits.


MATHEMATICA

a[1] = 5; a[n_] := a[n] = a[n  1] + Flatten[ Table[ IntegerDigits[ a[i]], {i, n  1}]][[n  1]]; Table[ a[n], {n, 61}] (* 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: A256641 A032242 A208541 * A262665 A106792 A232487
Adjacent sequences: A107972 A107973 A107974 * A107976 A107977 A107978


KEYWORD

base,easy,nonn


AUTHOR

Eric Angelini, Jun 12 2005


EXTENSIONS

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


STATUS

approved



