A178445 a(n) = prime(n)^2 mod n^2.

0, 1, 7, 1, 21, 25, 44, 41, 43, 41, 114, 73, 160, 85, 184, 249, 13, 157, 157, 241, 37, 433, 12, 433, 34, 61, 403, 473, 107, 169, 753, 777, 256, 825, 151, 769, 7, 577, 511, 1129, 102, 1009, 1350, 465, 334, 1513, 341, 1345, 1108, 2441

Offset

1,3

Links

Table of n, a(n) for n=1..50.

Formula

a(n) = A001248(n) mod A000290(n). [Corrected by Georg Fischer, Dec 13 2022]

Mathematica

Table[PowerMod[Prime[n], 2, n^2], {n, 50}] (* Harvey P. Dale, Jan 23 2013 *)

Crossrefs

Cf. A000290, A178211.

Sequence in context: A229825 A274717 A050310 * A019431 A264615 A261248

Adjacent sequences: A178442 A178443 A178444 * A178446 A178447 A178448

Keyword

nonn

Author

Juri-Stepan Gerasimov, Dec 22 2010

Extensions

Corrected by R. J. Mathar, Dec 22 2010

Status

approved