A175404 -id:A175404 - cp's OEIS frontend

2, 3, 5, 7, 29, 43, 317839, 3524611, 39088207

Offset: 1

Benoit Cloitre, Apr 06 2002

Select[Table[Fibonacci[k] + k, {k, 1, 40}], PrimeQ] (* Amiram Eldar, Jun 04 2022 *)

A002062 INTERSECT A000040. - R. J. Mathar, Apr 24 2017

a(n) = A002062(A175404(n)). - Amiram Eldar, Jun 04 2022

a(10), a 169-digit number, has been certified prime with Primo. - Rick L. Shepherd, Apr 26 2002

a(11), a 343-digit number, has been certified prime with Primo. - Charles R Greathouse IV, Feb 15 2011

6, 8, 16, 26, 28, 76, 148, 159, 808, 848, 916, 1143, 4036, 4959, 43239, 73432, 98716, 144039, 146132

Offset: 1

Paolo P. Lava, Mar 30 2016

			fibonacci(6) - 6 = 8 - 6 = 2 that is a prime;
fibonacci(8) - 8 = 21 - 8 = 13 that is a prime.

with(combinat): P:=proc(q) local n;
for n from 0 to q do
if isprime(fibonacci(n)-n) then print(n); fi; od; end: P(10^5);

Select[Range[150000],PrimeQ[Fibonacci[#]-#]&] (* Harvey P. Dale, May 03 2018 *)

lista(nn) = {for(n=1, nn, if(ispseudoprime(fibonacci(n)-n), print1(n, ", ")));} \\ Altug Alkan, Mar 30 2016

a(15)-a(19) from Giovanni Resta, Apr 14 2016

cp's OEIS Frontend