OFFSET
1,1
EXAMPLE
276799 is an element of this sequence because A103372(99) = 276799 and 276799 is semiprime because 276799 = 31 * 8929 where both 31 and 8929 are primes.
MATHEMATICA
SemiprimeQ[n_] := Plus @@ FactorInteger[n][[All, 2]] == 2; k = 4; Do[a[n] = 1, {n, k + 1}]; a[n_] := a[n] = a[n - k] + a[n - k - 1]; Union[Select[Array[a, 150], SemiprimeQ]]
Union[Select[LinearRecurrence[{0, 0, 0, 1, 1}, {1, 1, 1, 1, 1}, 150], PrimeOmega[#] == 2&]] (* Harvey P. Dale, Apr 22 2015 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Jonathan Vos Post, Feb 03 2005
EXTENSIONS
Edited, corrected and extended by Ray Chandler and Robert G. Wilson v, Feb 06 2005
STATUS
approved