A309031 Numbers k for which rank of the elliptic curve y^2=x^3+k*x is 4.

1918, 5190, 6123, 6953, 9603, 10759, 12483, 13398, 14673, 14795, 15910, 15934, 16238, 17753, 18278, 18705, 18814, 20148, 20398, 20658, 23180, 23953, 24475, 25988, 26809, 28633, 29274, 30340, 30688, 31073, 31098, 31174, 32118, 33218, 33278, 34804, 36955, 37214, 37298

Offset: 1

Author

Seiichi Manyama, Jul 08 2019

Keywords

• nonn

Crossrefs

Cf. A002158 (rank 0), A002159 (rank 1), A076329 (rank 2), A309030 (rank 3), this sequence (rank 4).

Cf. A060953, A309034.

Programs

Magma

for k in[1..10000] do if Rank(EllipticCurve([0,0,0,k,0])) eq 4 then print k; end if; end for; // Vaclav Kotesovec, Jul 08 2019

PARI

for(k=1, 1e4, if(ellanalyticrank(ellinit([0, 0, 0, k, 0]))[1]==4, print1(k", ")))