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 A359687 #39 Jan 25 2023 09:08:36
%S A359687 489489,525698,526535,763002,903210,1423214
%N A359687 Numbers k for which rank of the elliptic curve y^2 = x^3 - 432*k^2 is 5.
%F A359687 A060838(a(n)) = 5.
%o A359687 (PARI) is(n)=my(c=prod(i=1, #f~, f[i, 1]^(f[i, 2]\3)), r=n/c^3, E=ellinit([0, 16*r^2]), eri=ellrankinit(E), mwr=ellrank(eri), ar); if(r<489489, return(0)); if(mwr[1]>5 || mwr[2]<5, return(0)); ar=ellanalyticrank(E)[1]; if(ar<2, return(0)); for(effort=1, 99, mwr=ellrank(eri, effort); if(mwr[1]>5 || mwr[2]<5, return(0), mwr[1]==5 && mwr[2]==5, return(1))); Str("unknown; ",ar==5," under BSD conjecture") \\ _Charles R Greathouse IV_, Jan 25 2023
%Y A359687 Subsequence of A159843.
%Y A359687 Cf. A060748, A060838, A309960 (rank 0), A309961 (rank 1), A309962 (rank 2), A309963 (rank 3), A309964 (rank 4).
%K A359687 nonn,more
%O A359687 1,1
%A A359687 Maksym Voznyy and _Charles R Greathouse IV_, Jan 25 2023