login
A393070
Numbers k such that A276086(k) <= A003959(k).
4
2, 4, 6, 8, 12, 30, 31, 32, 33, 36, 60, 64, 210, 211, 212, 213, 214, 215, 216, 217, 218, 220, 222, 224, 240, 241, 242, 243, 246, 270, 420, 421, 422, 423, 424, 426, 432, 450, 630, 2310, 2311, 2312, 2313, 2314, 2315, 2316, 2317, 2318, 2319, 2320, 2321, 2322, 2323, 2324, 2325, 2326, 2328, 2340, 2341, 2342, 2343, 2344
OFFSET
1,1
PROG
(PARI) is_A393070(n) = (A276086(n) <= A003959(n));
(PARI) is_A393070(n) = if(!n, 0, my(f=factor(n), u, m=1, orgn=n); for(i=1, #f~, f[i, 1]++); u = factorback(f); forprime(p=2, , m *= (p^(n%p)); if(m>u, return(0)); n \= p; if(0==n, return(1))));
CROSSREFS
Subsequences: A351226, A351228, A351229, A369970 (after its two initial terms), A392602, A393040.
Sequence in context: A063008 A303555 A136101 * A187779 A086141 A067883
KEYWORD
nonn
AUTHOR
Antti Karttunen, Feb 09 2026
STATUS
approved