OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..70
MATHEMATICA
f[n_]:=Length[Divisors[n]]; lst={}; Do[fi=Fibonacci[n]; If[f[fi-1]==f[fi+1], AppendTo[lst, fi]], {n, 170}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Dec 14 2009
EXTENSIONS
a(15)-a(16) from Amiram Eldar, Aug 08 2024
STATUS
approved