OFFSET
1,2
LINKS
Enrique Pérez Herrero, Table of n, a(n) for n = 1..10000
EXAMPLE
105 = 3*5*7 and sigma(105) = 1 + 3 + 5 + 7 + 15 + 21 + 35 + 105 = 192 < 210 = 2*105, so 105 is in the sequence.
The sequence differs from A006881: first term with 3 distinct prime factors is 105.
MATHEMATICA
isA087247[n_] := SquareFreeQ[n] && !PrimeQ[n] && (DivisorSigma[1, n] < 2n); Select[Range[200], isA087247] (* Enrique Pérez Herrero, Jan 13 2011 *)
PROG
(PARI) isok(n) = !isprime(n) && issquarefree(n) && (sigma(n) < 2*n); \\ Michel Marcus, Jul 09 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Sep 05 2003
STATUS
approved