A093399
Absolute value of difference between counts of uninterrupted runs of 3 nonprimes in A093187 and A093188.
Original entry on oeis.org
0, 1, 5, 4, 34, 116, 130, 241, 2187, 3076, 9683, 33067, 133346
Offset: 1
a(3)=5 because in A093187 the count is 10 and in A093188 the count is 5. 10-5=5.
A092642
Number of consecutive prime runs of 3 primes congruent to 1 mod 4 below 10^n.
Original entry on oeis.org
0, 0, 4, 38, 305, 2450, 20939, 182955, 1618599, 14491882, 131026137
Offset: 1
a(5)=305 because 305 sets of 3 primes occur below 10^5, each run interrupted by a prime congruent to 3 mod 4.
-
A002145 = Join[{0}, Select[4 Range[0, 10^4] + 3, PrimeQ[#] &]];
A002144 = Select[4 Range[0, 10^4] + 1, PrimeQ[#] &];
lst = {}; Do[If[Length[s = Select[A002144, Between[{A002145[[i]], A002145[[i + 1]]}]]] == 3, AppendTo[lst, Last[s]]], {i, Length[A002145] - 1}]; Table[Count[lst, x_ /; x < 10^n], {n, 4}] (* Robert Price, Jun 09 2019 *)
A092643
Number of consecutive prime runs of 3 primes congruent to 3 mod 4 below 10^n.
Original entry on oeis.org
0, 0, 1, 36, 323, 2480, 20947, 183898, 1621279, 14492365, 131016136
Offset: 1
a(5)=323 because 323 sets of 3 primes occur below 10^5, each run interrupted by a prime congruent to 1 mod 4.
Showing 1-3 of 3 results.