OFFSET
1,2
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
F. Smarandache, Definitions, Solved and Unsolved Problems, Conjectures, ..., edited by M. Perez, Xiquan Publishing House, 2000.
PROG
(PARI) is(n)=if(n<5, return(1)); my(f=factor(n)%4); if(vecmin(f[, 1])>1, return(1)); for(i=1, #f[, 1], if(f[i, 1]==3 && f[i, 2]%2, return(1))); 0 \\ Charles R Greathouse IV, Jun 18 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved