A157935 Primes of the form m^2+1 such that m^2-7 = prevprime(m^2) (= A007917(m^2)).

2917, 4357, 8101, 24337, 57601, 72901, 93637, 224677, 324901, 331777, 404497, 562501, 608401, 1166401, 1742401, 1822501, 4137157, 4639717, 5788837, 7290001, 7617601, 10265617, 10497601, 10929637, 12110401, 12362257, 14107537, 14243077

Offset

1,1

Comments

A subsequence of A005574. The values for m are listed in A157934, the next lower prime in A157183.

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Formula

a(n) = A157934(n)^2+1 = A157183(n)+8

Mathematica

Select[Range[4000]^2+1, PrimeQ[#]&&NextPrime[#, -1]==#-8&] (* Harvey P. Dale, Jun 14 2020 *)

Prog

(PARI) forstep(m=2, 9999, 2, isprime(m^2+1) & precprime(m^2)==m^2-7 & print1(m^2+1, ", "))

Crossrefs

Cf. A157183, A028883, A028882, A005574, A001912, A157934.

Sequence in context: A209046 A209018 A186562 * A081634 A358879 A054830

Adjacent sequences: A157932 A157933 A157934 * A157936 A157937 A157938

Keyword

nonn

Author

M. F. Hasler, Mar 18 2009

Status

approved