OFFSET
1,1
COMMENTS
Questions: Are there only multiples of 5 after the three initial terms? Are there any common terms with A228058?
LINKS
PROG
(PARI)
A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };
is_A364286(n) = if(isprime(n), 0, my(u=A276086(n)); (gcd(sigma(n), u)==2*gcd(n, u))); \\ Antti Karttunen, Jul 21 2025
m=-1; n=-1; k=0; while(m!=0, n+=2; if(!((n-1)%(2^25)), print1("("n")")); if(isprime(n) || is_A364286(n), if((m<0) || abs((sigma(n)/n)-2)<m, m=abs((sigma(n)/n)-2); k++; write("b386422.txt", k, " ", n); print1(n, ", "))));
CROSSREFS
Apart from initial 3, a subsequence of A364286.
KEYWORD
nonn,more
AUTHOR
Antti Karttunen, Jul 21 2025
STATUS
approved
