OFFSET
1,1
COMMENTS
Terms of A391253 without any multiples of 3.
LINKS
PROG
(PARI) is_A391328(n) = if(!(n%2) || !(n%3) || 2!=bigomega(n), 0, my(f=factor(n), a = f[1, 1], b = f[#f~, 1], Pa=Pol(binary(a))*Mod(1, 2), Pb=Pol(binary(b))*Mod(1, 2), Pn=Pol(binary(n))*Mod(1, 2)); ((0==lift(Pn % Pa)) || (0==lift(Pn % Pb))));
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Antti Karttunen, Dec 07 2025
STATUS
approved
