A309290 Numbers k such that binomial(k^2,k) - k^2 is squarefree.
0, 2, 5, 7, 11, 17, 19, 23, 29, 31, 33, 35, 41, 43, 47, 59, 61, 65, 67, 71, 73, 77, 79, 83, 89
Offset: 1
Links
- Juri-Stepan Gerasimov and others, C(2n,n) - n^2 and C(n^2,n) - n^n, SeqFan list, April 20, 2018.
Crossrefs
Programs
-
Magma
[0] cat [n: n in [2..45] | IsSquarefree(Binomial(n^2, n) - n^2)]; // Vincenzo Librandi, Jul 31 2019
-
Mathematica
Select[Range[0, 50], SquareFreeQ[Binomial[#^2, #] - #^2] &] (* Vincenzo Librandi, Jul 31 2019 *)
-
PARI
is(n)=issquarefree(binomial(n^2,n)-n^2) for(n=0,oo, is(n) && print1(n,", "))
Extensions
a(24) from Daniel Suteu, Jul 30 2019
a(25) from Tyler Busby, Mar 10 2025
Comments