|
Search: id:A104020
|
|
|
| A104020 |
|
Numbers n which can be represented as k^2*j, 0 < j =< k. |
|
+0
6
|
|
| 4, 9, 16, 18, 25, 32, 36, 48, 49, 50, 64, 72, 75, 81, 98, 100, 108, 121, 128, 144, 147, 162, 169, 180, 192, 196, 200, 225, 242, 243, 245, 256, 288, 289, 294, 300, 320, 324, 338, 361, 363, 384, 392, 400, 405, 432, 441, 448, 450, 484, 486, 500, 507, 512, 529, 567
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Leroy Quet, Home Page (listed in lieu of email address)
|
|
MATHEMATICA
|
Take[ Union[ Flatten[ Table[ k^2*j, {k, 25}, {j, k - 1}]]], 56]
|
|
CROSSREFS
|
Cf. A104021, A102354, A104022, A104024, A104026.
Sequence in context: A066926 A066925 A122379 this_sequence A066694 A102646 A104021
Adjacent sequences: A104017 A104018 A104019 this_sequence A104021 A104022 A104023
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Leroy Quet and Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 24 2005
|
|
|
Search completed in 0.002 seconds
|
