|
|
A105717
|
|
Smallest Fibonacci number that has 7 in the n-th position of the decimal representation
|
|
11
|
|
|
377, 377, 6765, 17711, 75025, 5702887, 267914296, 2971215073, 701408733, 7778742049, 27777890035288, 27777890035288, 17167680177565, 72723460248141, 51680708854858323072, 37889062373143906, 679891637638612258
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
|
|
MAPLE
|
N:= 100: # for a(0)..a(N)
F[0]:= 0: F[1]:= 1:
W:= Array(0..N):
count:= 0:
for m from 2 while count < N do
F[m]:= F[m-1]+F[m-2];
L:= convert(F[m], base, 10);
M:= select(t -> L[t+1]=7 and W[t]=0, [$0..min(N, nops(L)-1)]);
count:= count + nops(M);
W[M]:= F[m]
od:
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|