[go: up one dir, main page]

login
A239392
Numbers n that have record value of prime p such that p + 2n is another prime.
3
1, 3, 11, 44, 56, 101, 359, 664, 821, 866, 2623, 2944, 5171, 12839, 18833, 29947, 38002, 51551, 54206, 90407, 179831, 325681, 436349, 1186739, 3044396, 3821264, 4622276, 6519176, 6795596, 12159494, 17428889, 27538202, 73919371, 127586456, 266466008, 423717053, 458430559
OFFSET
1,2
COMMENTS
See A101045 of the values of p > 2.
FORMULA
a(n) = A370998(A371069(n)). - Hugo Pfoertner, Mar 11 2024
MATHEMATICA
nn = 10^5; t = Table[j = 1; found = False; While[! found, j++; found = PrimeQ[Prime[j] + 2 i]]; Prime[j], {i, nn}]; mx = -1; t2 = {}; Do[If[t[[i]] > mx, mx = t[[i]]; AppendTo[t2, {i, t[[i]]}]], {i, nn}]; Transpose[t2][[1]]
CROSSREFS
Cf. A020483 (least p with p, q both prime, such that p+2n = q).
Sequence in context: A302333 A345670 A370998 * A122393 A012880 A200613
KEYWORD
nonn
AUTHOR
T. D. Noe, Mar 19 2014
EXTENSIONS
a(30)-a(35) from Giovanni Resta, Mar 19 2014
a(36)-a(37) from Hugo Pfoertner, Mar 11 2024
STATUS
approved