A181670 Triangle read by rows: T(n,k) = 2^(n-1) mod prime(k), 1 <= k <= n.

1, 0, 2, 0, 1, 4, 0, 2, 3, 1, 0, 1, 1, 2, 5, 0, 2, 2, 4, 10, 6, 0, 1, 4, 1, 9, 12, 13, 0, 2, 3, 2, 7, 11, 9, 14, 0, 1, 1, 4, 3, 9, 1, 9, 3, 0, 2, 2, 1, 6, 5, 2, 18, 6, 19, 0, 1, 4, 2, 1, 10, 4, 17, 12, 9, 1, 0, 2, 3, 4, 2, 7, 8, 15, 1, 18, 2, 13, 0, 1, 1, 1, 4, 1, 16, 11, 2, 7, 4, 26, 37, 0, 2, 2, 2, 8, 2, 15

Offset: 1

Author

Juri-Stepan Gerasimov, Dec 02 2010

Keywords

• nonn
• tabl

Examples

			Triangle begins:
  1;
  0, 2;
  0, 1, 4;
  0, 2, 3, 1;
  0, 1, 1, 2, 5;
  0, 2, 2, 4,10, 6;
  0, 1, 4, 1, 9,12,13;
  0, 2, 3, 2, 7,11, 9,14;
  0, 1, 1, 4, 3, 9, 1, 9, 3;
		

Crossrefs

Cf. A174620.

Programs

Mathematica

Flatten[Table[Mod[2^(n-1),Prime[k]],{n,14},{k,n}]]

Extensions

Corrected by T. D. Noe, Dec 02 2010