login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A179672 Products of the 6st power of a prime and 2 distinct primes (p^6*q*r). 8
960, 1344, 2112, 2240, 2496, 3264, 3520, 3648, 4160, 4416, 4928, 5440, 5568, 5824, 5952, 6080, 7104, 7290, 7360, 7616, 7872, 8256, 8512, 9024, 9152, 9280, 9920, 10176, 10206, 10304, 11328, 11712, 11840, 11968, 12864, 12992, 13120, 13376, 13632 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

T. D. Noe, Table of n, a(n) for n = 1..1000

Will Nicholes, Prime Signatures

Index to sequences related to prime signature

MAPLE

op(select(n->nops(factorset(n))=3 and sort([seq(op(2, a), a=ifactors(n)[2])])=[1, 1, 6], [$1..13632])); # Paolo P. Lava, Jul 18 2019

MATHEMATICA

f[n_]:=Sort[Last/@FactorInteger[n]]=={1, 1, 6}; Select[Range[20000], f]

PROG

(PARI) list(lim)=my(v=List(), t1, t2); forprime(p=2, (lim\6)^(1/6), t1=p^6; forprime(q=2, lim\t1, if(p==q, next); t2=t1*q; forprime(r=q+1, lim\t2, if(p==r, next); listput(v, t2*r)))); vecsort(Vec(v)) \\ Charles R Greathouse IV, Jul 20 2011

CROSSREFS

Sequence in context: A316338 A257417 A137491 * A158412 A247723 A057666

Adjacent sequences:  A179669 A179670 A179671 * A179673 A179674 A179675

KEYWORD

nonn

AUTHOR

Vladimir Joseph Stephan Orlovsky, Jul 23 2010

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 18 14:32 EDT 2019. Contains 328161 sequences. (Running on oeis4.)