|
|
A362100
|
|
Numbers k such that 8^k starts with k.
|
|
1
|
|
|
4, 10, 18, 652, 1299, 8225, 12949, 56230, 156277, 3227298, 144225157
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MAPLE
|
filter:= proc(n) local d1, d2, t;
t:= 8^n;
d1:= ilog10(t);
d2:= ilog10(n);
floor(t/10^(d1-d2)) = n
end proc:
|
|
PROG
|
(Python)
from itertools import count, islice
def A362100_gen(startvalue=1): # generator of terms >= startvalue
a = 1<<3*(m:=max(startvalue, 1))
for n in count(m):
if (s:=str(n))==str(a)[:len(s)]:
yield n
a <<= 3
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|