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.

A190469 Numbers with prime factorization p^2*q^2*r^6 where p, q, and r are distinct primes.

Original entry on oeis.org

14400, 28224, 69696, 72900, 78400, 97344, 142884, 166464, 193600, 207936, 270400, 304704, 352836, 379456, 462400, 484416, 492804, 529984, 553536, 562500, 577600, 788544, 842724, 846400, 893025, 906304, 968256, 1052676, 1065024, 1132096
Offset: 1

Views

Author

Keywords

Crossrefs

Programs

  • Mathematica
    f[n_]:=Sort[Last/@FactorInteger[n]]=={2,2,6}; Select[Range[1600000],f]
  • PARI
    list(lim)=my(v=List(),t1,t2);forprime(p=2, (lim\36)^(1/6), t1=p^6;forprime(q=2, sqrt(lim\t1), if(p==q, next);t2=t1*q^2;forprime(r=q+1, sqrt(lim\t2), if(p==r,next);listput(v,t2*r^2)))); vecsort(Vec(v)) \\ Charles R Greathouse IV, Jul 20 2011

Formula

Sum_{n>=1} 1/a(n) = P(2)^2*P(6)/2 - P(2)*P(8)/2 - P(4)*P(6)/2 - P(2)*P(8) + P(10) = 0.00024535673248061231753..., where P is the prime zeta function. - Amiram Eldar, Mar 07 2024