OFFSET
1,1
COMMENTS
All primes are in this sequence, having only one proper divisor. The specifically nonprime members of this sequence are in A055719. - Carl R. White, Jul 11 2012
LINKS
Carl R. White, Table of n, a(n) for n = 1..10000
FORMULA
Numbers n such that A054009(n) = 0.
EXAMPLE
There are three proper divisors of 6, {1, 2, 3}, 6 is divisible by 3.
MAPLE
[seq(`if`(i mod (tau(i)-1) = 0, i, print( )), i=2..190)];
MATHEMATICA
Select[Range[2, 100], IntegerQ[ #/(-1+DivisorSigma[0, # ])]&] (* Wouter Meeussen, Jun 07 2005 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Asher Auel, Jan 12 2000
STATUS
approved