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.
%I A186098 #38 Nov 03 2021 14:05:06 %S A186098 2,7,23,31,41,53,61,137,157,193,233,241,257,283,293,311,397,439,479, %T A186098 499,523,557,593,647,883,1061,1129,1213,1303,1381,1429,1439,1543,1601, %U A186098 1847,1867,1877,1931,2011,2063,2129,2293,2333,2347,2393,2477,2551,2633,2677,2687 %N A186098 Primes removed by sieve generating A095117. %C A186098 Primes not of the form k + primepi(k). [corrected by _Michel Marcus_, Oct 27 2021] %H A186098 Bill McEachen, <a href="/A186098/b186098.txt">Table of n, a(n) for n = 1..10000</a> %t A186098 Complement[Prime@ Range@ PrimePi[#], Array[PrimePi[#] + # &, #]] &[2700] (* _Michael De Vlieger_, Oct 27 2021 *) %o A186098 (PARI) genit(maxx=50)={arr=List(); for(n=0,maxx,q=n+prime(n+1); if(ispseudoprime(q),listput(arr,q))); arr} \\ _Bill McEachen_, Oct 27 2021 %Y A186098 Complement of A076757 in the primes. %Y A186098 Cf. A095117. %K A186098 nonn %O A186098 1,1 %A A186098 _Carmine Suriano_, Mar 29 2011