|
| |
|
|
A102654
|
|
Add 7 to each of the preceding digits, beginning with 0.
|
|
9
| |
|
|
0, 7, 14, 8, 11, 15, 8, 8, 8, 12, 15, 15, 15, 8, 9, 8, 12, 8, 12, 8, 12, 15, 16, 15, 8, 9, 15, 8, 9, 15, 8, 9, 8, 12, 8, 13, 8, 12, 15, 16, 8, 12, 15, 16, 8, 12, 15, 16, 15, 8, 9, 15, 8, 10, 15, 8, 9, 8, 12, 8, 13, 15, 8, 9, 8, 12, 8, 13, 15, 8, 9, 8, 12, 8, 13, 8, 12, 15, 16, 8, 12, 15, 8, 7
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
EXAMPLE
| Add 7 to the first "7" gives 14
Add 7 to the "1" of this 14 gives 8; and adding 7 to the "4" of this 14 gives 11.
|
|
|
MATHEMATICA
| Flatten[ NestList[ Function[x, Flatten[ IntegerDigits[x] + 7]], {0}, 10]] (from Robert G. Wilson v Feb 04 2005)
|
|
|
CROSSREFS
| Cf. A103693, A103694, A103695, A103696, A103697, A103698, A103699, A103700.
Sequence in context: A000730 A160534 A022699 * A048727 A196178 A064666
Adjacent sequences: A102651 A102652 A102653 * A102655 A102656 A102657
|
|
|
KEYWORD
| base,easy,nonn
|
|
|
AUTHOR
| Alexandre Wajnberg (alexandre.wajnberg(AT)ulb.ac.be), Feb 02 2005
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 04 2005
|
| |
|
|
