OFFSET
1,1
COMMENTS
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..74
PROG
(PARI) a060385(n) = my(f=factor(fibonacci(n))[, 1]); f[#f];
a000129(n) = ([2, 1; 1, 0]^n)[2, 1];
a264137(n) = my(p=factor(a000129(n))[, 1]); p[#p];
lista(nn) = for(n=3, nn, if(a264137(n) < a060385(n), print1(n, ", ")));
CROSSREFS
KEYWORD
nonn
AUTHOR
Altug Alkan, Apr 03 2016
EXTENSIONS
a(37)-a(54) from Amiram Eldar, May 19 2024
STATUS
approved