|
Search: id:A100846
|
|
|
| A100846 |
|
Numbers with decimal expansion 1nn1. |
|
+0
7
|
|
| 1111, 1221, 1331, 1441, 1551, 1661, 1771, 1881, 1991, 110101, 111111, 112121, 113131, 114141, 115151, 116161, 117171, 118181, 119191, 120201, 121211, 122221, 123231, 124241, 125251, 126261, 127271, 128281, 129291, 130301, 131311, 132321
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
EXAMPLE
|
If n=5, 1nn1 is 1551
If n=10, 1nn1 is 110101
|
|
MATHEMATICA
|
For[n = 1, n < 30, n++, l := Floor[Log[10, n] + 1]; gvout := (n*10^l + n)*10 + 1; m := Floor[Log[10, gvout]]; giveout := 10^(m + 1) + out; Print[giveout]] (Steinerberger)
|
|
CROSSREFS
|
Sequence in context: A036105 A036103 A086887 this_sequence A072434 A033285 A085109
Adjacent sequences: A100843 A100844 A100845 this_sequence A100847 A100848 A100849
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Parthasarathy Nambi (PachaNambi(AT)yahoo.com), Jan 07 2005
|
|
EXTENSIONS
|
More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), Jan 27 2006
|
|
|
Search completed in 0.002 seconds
|
