login
Numerator of n*(n-3)*(3*n^2-6*n+2)/(3*(n-1)*(n-2)).
1

%I #9 Sep 08 2022 08:44:47

%S 0,52,235,111,1498,2920,1719,4235,13156,6516,28015,19481,17610,70096,

%T 91273,19485,147592,183940,75537,138149,333730,133224,474925,280163,

%U 218916,765100,886327,170235,1171366

%N Numerator of n*(n-3)*(3*n^2-6*n+2)/(3*(n-1)*(n-2)).

%H G. C. Greubel, <a href="/A023417/b023417.txt">Table of n, a(n) for n = 3..1000</a>

%t Numerator[Table[n*(n - 3)*(3*n^2 - 6*n + 2)/(3*(n - 1)*(n - 2)), {n, 3, 50}]] (* _G. C. Greubel_, Jan 01 2018 *)

%o (PARI) for(n=3, 30, print1(numerator(n*(n - 3)*(3*n^2 - 6*n + 2)/(3*(n - 1)*(n - 2))), ", ")) \\ _G. C. Greubel_, Jan 01 2018

%o (Magma) [Numerator(n*(n - 3)*(3*n^2 - 6*n + 2)/(3*(n - 1)*(n - 2))): n in [3..30]]; // _G. C. Greubel_, Jan 01 2018

%K nonn

%O 3,2

%A _N. J. A. Sloane_