login
A076810
Least k such that k*n^n +/- 1 are twin primes.
0
4, 1, 4, 57, 42, 3, 720, 243, 28, 57, 138, 63, 714, 1635, 602, 198, 666, 1328, 3390, 1047, 1372, 4980, 2796, 308, 60, 2883, 676, 1782, 16068, 130, 108, 16968, 466, 1920, 1986, 1710, 12840, 4545, 9628, 1707, 7098, 1890, 5520, 3042, 504, 4512, 13614
OFFSET
1,1
MATHEMATICA
nxt[n_]:=Module[{nn=n^n, k=1}, While[!PrimeQ[k nn+1]||!PrimeQ[k nn-1], k++]; k]; Array[nxt, 50] (* Harvey P. Dale, Jun 30 2011 *)
CROSSREFS
Sequence in context: A033918 A136467 A079188 * A303144 A370451 A265602
KEYWORD
nonn
AUTHOR
Jason Earls, Nov 18 2002
STATUS
approved