%I A094495
%S A094495 0,0,0,1,2,1,1,3,3,1,1,4,6,4,1,1,5,10,10,5,1,1,6,15,20,15,6,1,1,7,21,35,
%T A094495 35,21,7,1,1,8,28,56,6,56,28,8,1,1,9,36,3,45,45,3,36,9,1,1,10,45,20,10,
%U A094495 52,10,20,45,10,1,1,11,55,44,88,99,99,88,44,55,11,1,1,12,66,76,63,72,60
%N A094495 a[n]=Mod[C[n,j],n^2], binomial coefficients mod n^2, the square of n,
read by rows.
%C A094495 a[0]=0 by convention.
%e A094495 First deviation from A007318 is at a[40] because C[8,4]=70 and Mod[70,
64]=6.
%t A094495 Flatten[Table[Table[Mod[Binomial[n, j], n^2], {j, 0, n}], {n, 1, 20}],
1]
%Y A094495 Cf. A007318, A053200, A094496, A094497.
%Y A094495 Sequence in context: A095144 A144398 A034932 this_sequence A154926 A117440
A118433
%Y A094495 Adjacent sequences: A094492 A094493 A094494 this_sequence A094496 A094497
A094498
%K A094495 easy,nonn,tabl
%O A094495 0,5
%A A094495 Labos E. (labos(AT)ana.sote.hu), Jun 02 2004
|