A113150 Primes p such that p+1, p+2, p+3, p+4, p+5 are resp. 2-, 3-, 4-, 5-, 6-almost primes.
838561, 1190821, 2116921, 3318421, 3456721, 3720361, 3776881, 4185121, 5712241, 5811241, 6455521, 6457621, 6793321, 7450501, 7981801, 8321881, 8391001, 9903721, 11420041, 11980921, 12806041, 13311301, 13748521, 14326021, 14566261
Offset: 1
Keywords
Links
- Zak Seidov, Table of n, a(n) for n = 1..2000
- Eric Weisstein's World of Mathematics, Almost Prime.
Programs
-
Magma
[ n: n in PrimesUpTo(15000000) | forall{ k: k in [1..5] | &+[ f[j, 2]: j in [1..#f] ] eq k+1 where f is Factorization(n+k) } ]; // Klaus Brockhaus, Jan 24 2011 -
Mathematica
Select[Prime[Range[10^6]], PrimeOmega[#+1]==2 && PrimeOmega[#+2]==3 && PrimeOmega[#+3]==4 && PrimeOmega[#+4]==5 && PrimeOmega[#+5]==6&] (* James C. McMahon, Jun 16 2024 *)
-
PARI
isok(n) = bigomega(n)==1 && bigomega(n+1)==2 && bigomega(n+2)==3 && bigomega(n+3)==4 && bigomega(n+4)==5 && bigomega(n+5)==6; \\ Michel Marcus, Oct 23 2014
Extensions
Edited by Charles R Greathouse IV, Apr 20 2010
Comments