

A163856


Primes of the form Fibonacci(k)10.


0



3, 11, 79, 223, 367, 977, 514219, 24157807, 53316291163, 420196140727489663, 573147844013817084091, 48558529144435440119720805669229197631, 538522340430300790495419781092981030523
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

Generated by k= 7, 8, 11, 13, 14, 16, 29, 37, 53, 86, 101, 182, 187, 221,...


LINKS



FORMULA



MATHEMATICA

Clear[lst, a, f, n, p]; a=10; lst={}; Do[f=Fibonacci[n]; If[PrimeQ[p=fa]&&p> 1, AppendTo[lst, p]], {n, 3*6!}]; lst
Select[Fibonacci[Range[7, 200]]10, PrimeQ] (* Harvey P. Dale, Feb 17 2020 *)


CROSSREFS



KEYWORD

nonn


AUTHOR



EXTENSIONS



STATUS

approved



