|
|
|
|
1, 4, 9, 16, 18, 25, 49, 50, 64, 81, 100, 121, 169, 200, 256, 338, 361, 392, 400, 441, 450, 529, 578, 625, 648, 676, 722, 729, 784, 800, 841, 900, 961, 1024, 1089, 1156, 1225, 1250, 1296, 1352, 1369, 1568, 1600, 1682, 1800, 1849, 2025, 2116, 2209, 2312, 2401, 2450, 2592, 2601, 2704, 2738, 3042, 3136, 3200, 3249, 3362, 3364, 3481, 3600
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Numbers k such that A332224(k) is odd, or equally, that A332448(k) is zero.
|
|
LINKS
|
|
|
PROG
|
(PARI)
isA332443(n) = (A087808(sigma(n))%2);
A332443list(u) = { my(v1=vector(2*u, n, 2*(n^2)), v2=vector(sqrtint(v1[#v1]), n, n^2)); select(isA332443, Vec(setunion(v1, v2))); };
v332443 = A332443list(8192);
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|