A175036 a(n) = 2^(n-1) mod prime(n).

1, 2, 4, 1, 5, 6, 13, 14, 3, 19, 1, 13, 37, 22, 28, 14, 46, 44, 40, 24, 4, 18, 65, 2, 96, 10, 38, 31, 66, 2, 4, 124, 34, 82, 69, 32, 75, 103, 114, 5, 36, 78, 20, 6, 135, 125, 24, 132, 12, 13, 152, 24, 16, 8, 64, 218, 37, 55, 59, 170, 15, 270, 101, 104, 142, 185, 64, 16, 243, 28, 319, 12, 63, 308, 156, 252, 193, 334, 18, 159, 375, 298, 27, 316, 292, 65, 410, 220, 236, 173, 329, 46, 76, 150, 447, 46, 320, 118, 25, 17, 206, 399, 336, 457, 150, 3, 49, 116, 392, 512, 81, 77, 113, 75, 188, 50, 131, 116, 647, 63, 68

Offset: 1

Author

Juri-Stepan Gerasimov, Dec 02 2010

Keywords

• nonn

Crossrefs

Cf. A181670.

Programs

Mathematica

Table[PowerMod[2,n-1,Prime[n]],{n,200}] (* Zak Seidov, Dec 02 2010 *)

Extensions

More terms from Zak Seidov, Dec 02 2010