|
|
A258938
|
|
Index of the Lucas numbers in A258740.
|
|
2
|
|
|
2, 3, 4, 6, 7, 8, 9, 11, 14, 18, 19, 21, 23, 25, 30, 32, 33, 42, 44, 47, 57, 59, 63, 65, 71, 76, 77, 82, 83, 85, 86, 93, 97, 107, 108, 111, 116, 117, 118, 121, 127, 131, 135, 137, 139, 143, 151, 153, 154, 162, 164, 167, 175, 177, 183, 185, 188, 189, 194, 195
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
This sequence is probably finite with 228 terms. The probable last term of the sequence is a(228) = 6903, and the corresponding Lucas number A000032(6903) = 4382083468497... 10084254004 contains 1443 decimal digits.
|
|
LINKS
|
|
|
EXAMPLE
|
7 is in the sequence because L(7)= A000032(7) = 29 = A258740(5) where 2+9=11 > 7.
|
|
MAPLE
|
with(combinat, fibonacci):with(numtheory):
a:=n->2*fibonacci(n-1)+fibonacci(n):
for m from 1 to 400 do:
x:=a(m):y:=convert(x, base, 10):n1:=nops(y):
s:=sum('y[i]', 'i'=1..n1):
if s>m
then
printf(`%d, `, m):
else
fi:
od:
|
|
PROG
|
(PARI) lista(nn) = {for(n=1, nn, if (sumdigits(l = fibonacci(n+1) + fibonacci(n-1)) > n, print1(n, ", "))); } \\ Altug Alkan, Nov 08 2015
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|