|
|
A228057
|
|
Odd numbers of the form p * m^2, where p is prime and m > 1.
|
|
3
|
|
|
27, 45, 63, 75, 99, 117, 125, 147, 153, 171, 175, 207, 243, 245, 261, 275, 279, 325, 333, 343, 363, 369, 387, 405, 423, 425, 475, 477, 507, 531, 539, 549, 567, 575, 603, 605, 637, 639, 657, 675, 711, 725, 747, 775, 801, 833, 845, 847, 867, 873, 891, 909, 925
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
This sequence is the second step toward candidates for odd perfect numbers, A228058.
|
|
LINKS
|
|
|
MATHEMATICA
|
nn = 1000; Union[Select[Flatten[Table[p*n^2, {p, Prime[Range[2, PrimePi[nn/4]]]}, {n, 3, Sqrt[nn/2], 2}]], # < nn &]]
|
|
PROG
|
(Haskell)
a228057 n = a228057_list !! (n-1)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|