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

0, 2, 3, 12, 5, 12, 7, 56, 9, 40, 11, 108, 13, 84, 90, 240, 17, 144, 19, 80, 315, 220, 23, 72, 25, 312, 27, 560, 29, 0, 31, 992, 759, 544, 770, 720, 37, 684, 1053, 520, 41, 252, 43, 1408, 1125, 1012, 47, 1872, 49, 1200, 918, 624, 53, 1404, 2475, 2744, 2223, 1624, 59

Offset

1,2

Links

Seiichi Manyama, Table of n, a(n) for n = 1..10000

Formula

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

Maple

A081369:=n->binomial(n^2, n) mod n^2; seq(A081369(n), n=1..100); # Wesley Ivan Hurt, Jan 28 2014

Mathematica

Table[Mod[Binomial[n^2, n], n^2], {n, 100}] (* Wesley Ivan Hurt, Jan 28 2014 *)

Crossrefs

Cf. A014062, A081370.

Sequence in context: A214011 A378811 A344541 * A147967 A120487 A237873

Adjacent sequences: A081366 A081367 A081368 * A081370 A081371 A081372

Keyword

easy,nonn

Author

Labos Elemer, Mar 20 2003

Status

approved