A054812 Fifth term of strong prime quintets: p(m-3)-p(m-4) > p(m-2)-p(m-3) > p(m-1)-p(m-2) > p(m)-p(m-1).
1669, 1789, 1871, 1873, 1999, 2383, 2477, 2539, 2543, 3461, 3463, 4219, 4519, 5281, 5419, 5443, 6047, 6661, 7247, 7309, 7759, 7879, 7937, 8171, 8527, 9619, 9623, 11059, 11399, 11597, 11833, 12413, 13879, 14831, 15139, 15559, 16063, 16339
Offset: 1
Keywords
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Crossrefs
Programs
-
Mathematica
spqQ[c_]:=Module[{d=Differences[c]},d[[1]]>d[[2]]>d[[3]]>d[[4]]]; Transpose[ Select[Partition[Prime[Range[2000]],5,1],spqQ]][[5]] (* Harvey P. Dale, Jan 01 2013 *)
Comments