OFFSET
1,2
COMMENTS
Complement of A063806.
LINKS
Shawn A. Broyles, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[Range[300], ! PrimeQ[DivisorSigma[0, # ] - 1] &] (* Stefan Steinerberger, Jan 31 2009 *)
PROG
(PARI) isok(n) = !isprime(numdiv(n)-1); \\ Michel Marcus, Apr 27 2018
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Omar E. Pol, Jan 25 2009
EXTENSIONS
More terms from Stefan Steinerberger, Jan 31 2009
STATUS
approved