OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
E.g. Omega(3) = 1 + 0 = Omega(2) + Omega(1). Omega(4) = 1 + 1 = Omega(3) + Omega(2).
8 is a term because Omega(8)=3=Omega(7)+Omega(6)=1+2=3
MATHEMATICA
Omega[n_] := Apply[Plus, Transpose[FactorInteger[n]][[2]]]; l = {3}; Do[If[Omega[n] == Omega[n - 1] + Omega[n - 2], l = Append[l, n]], {n, 4, 1000}]; l
Flatten[Position[Partition[PrimeOmega[Range[700]], 3, 1], _?(#[[1]]+#[[2]]==#[[3]]&), 1, Heads->False]]+2 (* Harvey P. Dale, Aug 24 2019 *)
PROG
(PARI) j=[]; for(n=1, 1000, if(bigomega(n)==bigomega(n-1)+bigomega(n-2), j=concat(j, n))); j
CROSSREFS
KEYWORD
nonn
AUTHOR
Joseph L. Pe, Oct 30 2002
STATUS
approved