login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Binomial(n^2, n) reduced mod n^2.
3

%I #12 Mar 24 2024 09:55:16

%S 0,2,3,12,5,12,7,56,9,40,11,108,13,84,90,240,17,144,19,80,315,220,23,

%T 72,25,312,27,560,29,0,31,992,759,544,770,720,37,684,1053,520,41,252,

%U 43,1408,1125,1012,47,1872,49,1200,918,624,53,1404,2475,2744,2223,1624,59

%N Binomial(n^2, n) reduced mod n^2.

%H Seiichi Manyama, <a href="/A081369/b081369.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n)=Mod[C(n^2, n), n^2]

%p A081369:=n->binomial(n^2, n) mod n^2; seq(A081369(n), n=1..100); # _Wesley Ivan Hurt_, Jan 28 2014

%t Table[Mod[Binomial[n^2, n], n^2], {n, 100}] (* _Wesley Ivan Hurt_, Jan 28 2014 *)

%Y Cf. A014062, A081370.

%K easy,nonn

%O 1,2

%A _Labos Elemer_, Mar 20 2003