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.

A190466 Numbers with prime factorization pq^2r^7.

This page as a plain text file.
%I A190466 #10 May 13 2013 01:49:35
%S A190466 5760,8064,9600,12672,14976,18816,19584,21888,22400,26496,31360,33408,
%T A190466 35200,35712,41600,42624,43740,46464,47232,49536,54144,54400,60800,
%U A190466 61056,61236,64896,67968,68992,70272,73600,77184,77440,81536,81792
%N A190466 Numbers with prime factorization pq^2r^7.
%H A190466 T. D. Noe, <a href="/A190466/b190466.txt">Table of n, a(n) for n = 1..1000</a>
%H A190466 Will Nicholes, <a href="http://willnicholes.com/math/primesiglist.htm">Prime Signatures</a>
%t A190466 f[n_]:=Sort[Last/@FactorInteger[n]]=={1,2,7}; Select[Range[150000],f]
%o A190466 (PARI) list(lim)=my(v=List(),t1,t2);forprime(p=2, (lim\12)^(1/7), t1=p^7;forprime(q=2, sqrt(lim\t1), if(p==q, next);t2=t1*q^2;forprime(r=2, lim\t2, if(p==r||q==r, next);listput(v,t2*r)))); vecsort(Vec(v)) \\ _Charles R Greathouse IV_, Jul 24 2011
%Y A190466 Cf. A179747, A190465.
%K A190466 nonn
%O A190466 1,1
%A A190466 _Vladimir Joseph Stephan Orlovsky_, May 10 2011