A164519 Primes p such that p+2 is the square of a product of 3 distinct primes.
53359, 74527, 81223, 127447, 159199, 184039, 189223, 314719, 354023, 370879, 378223, 416023, 439567, 511223, 804607, 974167, 1046527, 1092023, 1177223, 1238767, 1535119, 1600223, 1718719, 2059223, 2082247, 2140367, 2223079
Offset: 1
Keywords
Examples
53359 + 2 = 3^2*7^2*11^2. 74527 + 2 = 3^2*7^2*13^2.
Links
- Chai Wah Wu, Table of n, a(n) for n = 1..11612
Programs
-
Mathematica
f[n_]:=FactorInteger[n][[1,2]]==2&&Length[FactorInteger[n]]==3&&FactorInteger[n][[2, 2]]==2&&FactorInteger[n][[3,2]]==2; lst={};Do[p=Prime[n];If[f[p+2], AppendTo[lst,p]],{n,4,9!}];lst
Extensions
Definition rephrased by R. J. Mathar, Oct 21 2009
Comments