A185660 Numbers k such that (k^3 + 11*k) +/-1 is a twin prime pair.

1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 13, 15, 16, 17, 20, 22, 37, 44, 46, 48, 52, 57, 61, 63, 68, 69, 70, 72, 81, 84, 86, 94, 96, 99, 101, 106, 108, 112, 117, 123, 124, 134, 138, 162, 178, 189, 191, 193, 200, 202, 206, 223, 224, 229, 260, 264, 271, 279, 282, 294, 297

Offset: 1

Author

G. L. Honaker, Jr., Feb 08 2011; proposed by Steve Homewood

Keywords

• nonn

Examples

			For k=9, the corresponding twin prime pair is {827, 829}.
		

Links

• G. C. Greubel, Table of n, a(n) for n = 1..5000
• Prime curio for 829

Crossrefs

Cf. A000040, A001097.

Programs

Mathematica

Select[Range[300], PrimeQ[#^3 + 11# - 1] && PrimeQ[#^3 + 11# + 1] &]
Select[Range[300],AllTrue[#^3+11#+{1,-1},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Nov 28 2014 *)