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 A096146 #15 Jul 11 2024 02:08:08
%S A096146 2,5,7,19,71,97,3691,191861,138907099,708158977,26947261171
%N A096146 Prime numerators of the rational convergents to sqrt(3).
%C A096146 Next term is too large to include.
%C A096146 This is the prime subsequence of A002531. See also A086386 for numerators where both numerator and denominator are primes. - _Ray Chandler_, Aug 01 2004
%H A096146 Amiram Eldar, <a href="/A096146/b096146.txt">Table of n, a(n) for n = 1..18</a>
%t A096146 Select[Numerator[Convergents[Sqrt[3],200]],PrimeQ] (* _Harvey P. Dale_, Nov 08 2022 *)
%o A096146 (PARI) \\ Continued fraction rational approximation of numeric constants f. m=steps.
%o A096146 cfracnumprime(m,f) = { default(realprecision,3000); cf = vector(m+10); x=f; for(n=0,m, i=floor(x); x=1/(x-i); cf[n+1] = i; ); for(m1=0,m, r=cf[m1+1]; forstep(n=m1,1,-1, r = 1/r; r+=cf[n]; ); numer=numerator(r); denom=denominator(r); if(ispseudoprime(numer),print1(numer,", ")); ) }
%Y A096146 Cf. A002531, A082630, A086386, A096147.
%K A096146 nonn
%O A096146 1,1
%A A096146 _Cino Hilliard_, Jul 24 2004
%E A096146 Offset corrected by _Amiram Eldar_, Jul 11 2024