[go: up one dir, main page]

login
A216417
Numbers of the form p^2*q^3 where p, q are (not necessarily distinct) primes.
0
32, 72, 108, 200, 243, 392, 500, 675, 968, 1125, 1323, 1352, 1372, 2312, 2888, 3087, 3125, 3267, 4232, 4563, 5324, 6125, 6728, 7688, 7803, 8575, 8788, 9747, 10952, 11979, 13448, 14283, 14792, 15125, 16807, 17672, 19652, 19773, 21125, 22472, 22707, 25947, 27436, 27848, 29768
OFFSET
1,1
MATHEMATICA
With[{nn=50}, Take[Union[First[#]^2 Last[#]^3&/@ Tuples[ Prime[ Range[ nn]], 2]], nn]] (* Harvey P. Dale, Jan 17 2014 *)
CROSSREFS
Union of A143610 (where p != q) and A050997 (where p = q).
Sequence in context: A250755 A216427 A104026 * A110230 A250756 A303583
KEYWORD
nonn
AUTHOR
V. Raman, Sep 07 2012
STATUS
approved