login
A155023
Values of n such that n^a-+a are primes, a=11.
0
0, 1770, 10182, 11700, 12090, 16548, 24192, 27570, 29142, 29148, 60648, 62790, 63120, 97110, 104502, 115140, 116718, 119682, 122130, 127728, 147210, 151848, 170292, 189318, 190452, 192738
OFFSET
1,2
MATHEMATICA
a={}; Do[m=n^11; If[PrimeQ[m-11]&&PrimeQ[m+11], AppendTo[a, n]], {n, 0, 9!}]; a
Select[Range[0, 200000], And@@PrimeQ[#^11+{11, -11}]&] (* Harvey P. Dale, Jun 20 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved