A091273 Indices of primes of the form k^2 - 11.
3, 16, 24, 65, 77, 137, 170, 227, 273, 341, 392, 532, 654, 792, 833, 1017, 1645, 1686, 1948, 2456, 2757, 2818, 3210, 3550, 4203, 4589, 4898, 5317, 5397, 5482, 5743, 6186, 6364, 6636, 6735, 6822, 7205, 7300, 8198, 8598, 8713, 8820, 9683, 10920, 11040, 11521, 11997
Offset: 1
Keywords
Programs
-
Mathematica
Select[Range[12000],IntegerQ[Sqrt[Prime[#]+11]]&] (* Harvey P. Dale, Jan 16 2011 *)
Extensions
Offset changed to 1 by Jinyuan Wang, Aug 02 2021
Comments