|
| |
|
|
A100129
|
|
Numbers n such that 2^n starts with n.
|
|
1
| |
|
|
6, 10, 1542, 77075, 113939, 1122772, 2455891300, 2830138178, 136387767490, 2111259099790, 3456955336468, 4653248164310, 10393297007134, 321249146279171, 972926121017616, 72780032758751764
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 2^6=64, which begins with 6, 2^10=1024, which begins with 10.
|
|
|
MATHEMATICA
| f[n_] := Floor[ 10^Floor[ Log[10, n]](10^FractionalPart[n*N[ Log[10, 2], 24]])]; Do[ If[ f[n] == n, Print[n]], {n, 125000000}] (from Robert G. Wilson v Nov 16 2004)
|
|
|
CROSSREFS
| Cf. A064541 for 2^n ending with n & A032740 with n a substring of 2^n.
Sequence in context: A124902 A153022 A115677 * A009443 A106540 A134012
Adjacent sequences: A100126 A100127 A100128 * A100130 A100131 A100132
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Mark Hudson (mrmarkhudson(AT)hotmail.com), Nov 15 2004
|
|
|
EXTENSIONS
| a(5) & a(6) from Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 16 2004
More terms from Robert Gerbicz (robert.gerbicz(AT)gmail.com), Aug 22 2006
|
| |
|
|
