OFFSET
1,1
COMMENTS
It could be argued that 1 should also be included in the sequence, if 0 is considered to be a composite, since the number of prime divisors (counted with multiplicity) of 1 and the sum of 1's distinct prime divisors are both 0.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
60 = 2^2 *3^1 *5^1. Both the number of prime divisors (counted with multiplicity), 2+1+1 = 4 and the sum of the distinct prime divisors, 2+3+5 = 10, are composite. So 60 is in the sequence.
MATHEMATICA
Select[Range[460], CompositeQ[Plus @@ (f = FactorInteger[#])[[;; , 1]]] && CompositeQ[Plus @@ f[[;; , 2]]] &] (* Amiram Eldar, Nov 14 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Feb 21 2006
EXTENSIONS
More terms from R. J. Mathar, Aug 31 2007
STATUS
approved