|
|
|
|
6, 28, 150, 496, 528, 1980, 4560, 8128, 8736, 11400, 19872, 20664, 75840, 82080, 253080, 254880, 741744, 1627290, 5130300, 5607360, 7529760, 19645440, 20718720, 33550336, 35092512, 45643392, 45995040, 56424960, 86944320, 169910136, 174013920, 180442080, 196378992, 242040960, 304577280, 314511360, 326611440, 451344960
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
PROG
|
(PARI)
A048250(n) = factorback(apply(p -> p+1, factor(n)[, 1]));
A344753(n) = sumdiv(n, d, (d<n)*(d+(issquarefree(n/d) * d)));
isA344755(n) = { my(t=A344753(n), u=A048250(n)); ((0==(t%u))&&(0==(n%(t/u)))); };
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|