OFFSET
1,1
COMMENTS
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..10000
PROG
(PARI)
A324054(n) = { my(p=2, mp=p*p, m=1); while(n, if(!(n%2), p=nextprime(1+p); mp = p*p, if(3==(n%4), mp *= p, m *= (mp-1)/(p-1))); n>>=1); (m); };
for(n=1, 201, if(isA324110(n), print1(n, ", ")))
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen and David A. Corneth, Feb 15 2019
STATUS
approved