This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A122499 #17 Aug 03 2025 23:39:28
%S A122499 4,9,14,155,2993,9707,184183,331981,1942071,1263047761,140390505643,
%T A122499 455845099957,296452328830865,32951342156444219,
%U A122499 2381929669709247097441,9063289616192276216577361,34485996673867704851362967681,426068342298911680872493712146539,117190394374593808526426397401539675762247
%N A122499 Semiprimes in A006053.
%t A122499 SemiprimeQ[n_Integer] := Plus @@ (Last /@ FactorInteger[n]) == 2;
%t A122499 a = Table[ SeriesCoefficient[ Series[x/(x^3 - 2*x^2 - x + 1), {x, 0, 50}], n], {n, 0, 50}];
%t A122499 f[n_] = If[SemiprimeQ[a[[n]]] == True, a[[n]], {}];
%t A122499 Flatten[Table[f[n], {n, 1, Length[a]}]]
%Y A122499 Intersection of A001358 and A006053.
%Y A122499 Cf. A006054.
%K A122499 nonn
%O A122499 1,1
%A A122499 _Roger L. Bagula_ and _Gary W. Adamson_, Sep 15 2006
%E A122499 Edited by _N. J. A. Sloane_, Sep 17 2006
%E A122499 More terms from _Amiram Eldar_, Jun 06 2025