login
Primes of the form Fibonacci(k)-10.
0

%I #5 Feb 17 2020 17:42:47

%S 3,11,79,223,367,977,514219,24157807,53316291163,420196140727489663,

%T 573147844013817084091,48558529144435440119720805669229197631,

%U 538522340430300790495419781092981030523

%N Primes of the form Fibonacci(k)-10.

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

%F {A000045(k) : A000045(k)-10 in A000040}.

%t Clear[lst,a,f,n,p]; a=10;lst={};Do[f=Fibonacci[n];If[PrimeQ[p=f-a]&&p> 1,AppendTo[lst,p]],{n,3*6!}];lst

%t Select[Fibonacci[Range[7,200]]-10,PrimeQ] (* _Harvey P. Dale_, Feb 17 2020 *)

%Y Cf. A000045, A163851, A163852, A163853, A163854, A163855

%K nonn

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Aug 05 2009

%E Definition rephrased by _R. J. Mathar_, Aug 12 2009