login
A104020
Numbers that can be represented as k^2*j, 0 < j <= k.
5
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
OFFSET
1,1
MATHEMATICA
Take[ Union[ Flatten[ Table[ k^2*j, {k, 25}, {j, k - 1}]]], 56]
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved