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 A103387 #10 Sep 01 2024 00:10:58
%S A103387 2,3,5,7,17,31,71,127,157,227,257,293,349,419,503,16007,32783,33329,
%T A103387 80429,220919,786433,878831,85790399,10666238497,394760836573,
%U A103387 22265159019759079,617347651958903360669,98459899570803393815965301
%N A103387 Primes in A103377.
%F A103387 Intersection of A103377 with A000040.
%t A103387 SemiprimeQ[n_]:=Plus@@FactorInteger[n][[All, 2]]?2; Clear[a]; k=9; Do[a[n]=1, {n, k+1}]; a[n_]:=a[n]=a[n-k]+a[n-k-1]; A103377=Array[a, 100] A103387=Union[Select[Array[a, 1000], PrimeQ]] A103397=Union[Select[Array[a, 300], SemiprimeQ]] N[Solve[x^10 - x - 1 == 0, x], 111][[2]]
%Y A103387 Cf. A103377, A103397.
%K A103387 easy,nonn
%O A103387 1,1
%A A103387 _Jonathan Vos Post_, Feb 15 2005