A217137 Numbers k such that 3^k + 10 is prime.

0, 1, 2, 3, 6, 8, 18, 36, 98, 114, 134, 138, 212, 252, 516, 1166, 2321, 2442, 2732, 4569, 8622, 8709, 16487, 22722, 25242, 29928, 32034, 33783, 34001, 44934, 50868, 77861, 90188, 102102, 171843, 178226, 273521

Offset: 1

Author

Vincenzo Librandi, Oct 01 2012

Keywords

• nonn
• more

Comments

a(37) > 2*10^5. - Robert Price, Oct 23 2013

a(38) > 3*10^5. - Tyler NeSmith, Jan 16 2021

Crossrefs

Cf. A014224, A051783, A058958, A058959, A102907.

Programs

Mathematica

Select[Range[0, 5000], PrimeQ[3^# + 10] &]

PARI

for(n=0, 5*10^3, if(isprime(3^n+10), print1(n", ")))

Extensions

a(21)-a(36) from Robert Price, Oct 23 2013

a(37) from Tyler NeSmith, Jan 16 2021