|
|
A182376
|
|
Smallest k>0 such that n-k, n+k, 3n-k and 3n+k are all primes, or 0 if no such k exisis.
|
|
0
|
|
|
0, 0, 0, 1, 2, 1, 0, 5, 4, 7, 0, 5, 0, 0, 2, 0, 0, 13, 0, 0, 10, 0, 0, 0, 22, 0, 20, 25, 0, 7, 0, 0, 10, 0, 32, 5, 0, 35, 20, 0, 0, 25, 0, 0, 22, 0, 0, 5, 0, 47, 46, 0, 0, 35, 0, 0, 40, 0, 0, 1, 0, 0, 10, 0, 0, 35, 0, 0, 0, 0, 0, 25, 0, 0, 14, 0, 0, 5, 0, 77
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,5
|
|
LINKS
|
|
|
EXAMPLE
|
a(4)=1 because 4-1=3, 4+1=5, 3*4-1=11 and 3*4+1=13 are all primes,
a(5)=2 because 5-2=3, 5+2=7, 3*5-2=13 and 3*5+2=17 are all primes.
|
|
MATHEMATICA
|
Table[k = 0; While[k < n && ! (PrimeQ[n - k] && PrimeQ[n + k] && PrimeQ[3 n - k] && PrimeQ[3 n + k]), k++]; If[k == n, 0, k], {n, 100}] (* T. D. Noe, Apr 26 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|