Amiram Eldar, <a href="/A129311/b129311_1.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..1000 from Giovanni Resta)
Amiram Eldar, <a href="/A129311/b129311_1.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..1000 from Giovanni Resta)
reviewed
approved
proposed
reviewed
editing
proposed
Amiram Eldar, <a href="/A129311/b129311_1.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..1000 from Giovanni Resta)
Giovanni Resta, Amiram Eldar, <a href="/A129311/b129311_1.txt">Table of n, a(n) for n = 1..100010000</a>
approved
editing
editing
approved
1, 185, 287, 296, 1372, 1959, 2531, 3630, 5393, 6332, 7210, 7315, 8108, 8258, 8794, 9340, 9989, 11270, 11706, 12213, 13494, 13710, 14246, 14402, 18188, 19010, 19075, 20179, 21394, 22483, 24256, 24309, 25070, 26284, 26634, 30578, 31799, 32351, 32652, 33390
Giovanni Resta, <a href="/A129311/b129311.txt">Table of n, a(n) for n = 1..1000</a>
PrimePi[Part[#, 1, 1] & /@ FactorInteger /@ Select[Times @@@ Partition[ Prime[Range[5 10^4]], 6, 1], PrimeQ[6 # + 1] && PrimeQ[6 # - 1] &]] (* Giovanni Resta, Sep 16 2019 *)
nonn,more,changed
More terms from Giovanni Resta, Sep 16 2019
approved
editing
editing
approved