login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A179664 Products of the 7th power of a prime and a distinct prime (p^7*q). 12
384, 640, 896, 1408, 1664, 2176, 2432, 2944, 3712, 3968, 4374, 4736, 5248, 5504, 6016, 6784, 7552, 7808, 8576, 9088, 9344, 10112, 10624, 10935, 11392, 12416, 12928, 13184, 13696, 13952, 14464, 15309, 16256, 16768, 17536, 17792, 19072, 19328 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
Will Nicholes, Prime Signatures
MATHEMATICA
f[n_]:=Sort[Last/@FactorInteger[n]]=={1, 7}; Select[Table[n, {n, 8!}], f[ # ]&]
PROG
(PARI) list(lim)=my(v=List(), t); forprime(p=2, (lim\2)^(1/7), t=p^7; forprime(q=2, lim\t, if(p==q, next); listput(v, t*q))); vecsort(Vec(v)) \\ Charles R Greathouse IV, Jul 20 2011
CROSSREFS
Sequence in context: A046491 A046492 A110296 * A212430 A134175 A233886
KEYWORD
nonn,changed
AUTHOR
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 10:22 EDT 2024. Contains 371268 sequences. (Running on oeis4.)