login
A167623
n^3 mod (n-th prime squared).
2
1, 8, 2, 15, 4, 47, 54, 151, 200, 159, 370, 359, 516, 895, 1166, 1287, 1432, 2111, 2370, 2959, 3932, 4407, 5278, 5903, 6216, 7375, 9074, 10503, 627, 1462, 13662, 15607, 17168, 662, 20674, 1054, 1355, 1734, 3541, 4142, 4839, 8566, 6545, 10686, 13507
OFFSET
1,2
LINKS
MATHEMATICA
(*1*) Table[PowerMod[n, 3, Prime[n]^2], {n, 100}]
(*2*) PowerMod[ #, 3, Prime[ # ]^2]&/@Range[100]
CROSSREFS
Sequence in context: A084495 A084499 A070487 * A040063 A196170 A164587
KEYWORD
nonn
AUTHOR
Zak Seidov, Nov 07 2009
STATUS
approved