|
Search: id:A107977
|
|
|
| A107977 |
|
First differences give the same sequence written as a string of individual digits. |
|
+0
5
|
|
| 9, 18, 19, 27, 28, 37, 39, 46, 48, 56, 59, 66, 69, 78, 82, 88, 92, 100, 105, 111, 116, 125, 131, 137, 143, 152, 159, 167, 175, 177, 185, 193, 202, 204, 205, 205, 205, 206, 206, 211, 212, 213, 214, 215, 216, 222, 223, 225, 230, 231, 234, 235, 236, 239, 246, 247
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
9.18.19.27.28.37.39.46.48.56 ... <- sequence
.9..1..8..1..9..2..7..2..8 ... <- first differences are the sequence's digits.
|
|
MATHEMATICA
|
a[1] = 9; a[n_] := a[n] = a[n - 1] + Flatten[ Table[ IntegerDigits[ a[i]], {i, n - 1}]][[n - 1]]; Table[ a[n], {n, 56}] (from Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 15 2005)
|
|
CROSSREFS
|
Cf. A100787, A107974, A107975, A107976, A107977 for "seeds" 1, 3, 5, 7 and 9.
Sequence in context: A040072 A034728 A060993 this_sequence A092457 A062057 A015785
Adjacent sequences: A107974 A107975 A107976 this_sequence A107978 A107979 A107980
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
Eric Angelini (eric.angelini(AT)kntv.be), Jun 12 2005
|
|
EXTENSIONS
|
Edited and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 15 2005
|
|
|
Search completed in 0.002 seconds
|
