cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A228171 Least prime such that between it and the next prime there are exactly n semiprimes.

This page as a plain text file.
%I A228171 #15 Aug 17 2013 17:25:15
%S A228171 2,3,7,31,89,139,113,211,1381,1637,1129,2557,2971,1327,15683,16141,
%T A228171 9973,35677,34061,43331,19609,107377,162143,44293,404597,461717,
%U A228171 838249,155921,535399,492113,396733,2181737,370261,1468277,6034247,3933599,1671781,25180171
%N A228171 Least prime such that between it and the next prime there are exactly n semiprimes.
%C A228171 a(62) = 1294268491, a(64) = 2300942549.
%H A228171 Giovanni Resta, <a href="/A228171/b228171.txt">Table of n, a(n) for n = 0..91</a>
%F A228171 a(n) is the prime precessing A228170(n-1).
%e A228171 a(2) = 7 since between 7 and the next prime, 11, there are 2 semiprimes (9, 10).
%t A228171 t = Table[0, {100}]; p=3; While[p < 3100000000, q = NextPrime[p]; a = Count[ PrimeOmega[ Range[p, q]], 2]; If[ t[[a]] == 0, t[[a]] = p; Print[{p, a}]]; p = q]; t
%Y A228171 Cf. A133478, A228170.
%K A228171 nonn
%O A228171 0,1
%A A228171 _Jack Brennen_, _Jonathan Vos Post_, _Zak Seidov_, and _Robert G. Wilson v_, Aug 14 2013