OFFSET
1,1
COMMENTS
PROG
(PARI)
A353627(n) = issquarefree(n>>valuation(n, 2));
(PARI) isA353456(n) = if(issquarefree(n=(n>>valuation(n, 2))), 0, my(f=factor(n)); for(k=1, #f~, if((f[k, 2]%4)>1, return(0))); (1)); \\ After Álvar Ibeas's Nov 28 2017 comment in A209635
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, May 03 2022
STATUS
approved