A094921 a(n) = (6^n-1)/5 mod n.

0, 1, 1, 3, 0, 1, 1, 3, 7, 5, 1, 7, 1, 7, 10, 3, 1, 7, 1, 15, 1, 7, 1, 19, 0, 7, 16, 7, 1, 25, 1, 19, 10, 7, 15, 7, 1, 7, 4, 35, 1, 7, 1, 39, 25, 7, 1, 19, 29, 25, 43, 51, 1, 43, 15, 35, 43, 7, 1, 55, 1, 7, 43, 51, 60, 25, 1, 55, 43, 35, 1, 43, 1, 7, 25, 31, 8, 49, 1, 35, 16, 7, 1, 7, 25, 7, 43, 27

Offset: 1

Author

N. J. A. Sloane, Jun 18 2004

Keywords

• nonn

Links

• Antti Karttunen, Table of n, a(n) for n = 1..20000

Crossrefs

Cf. A003464.

Programs

Mathematica

Table[Mod[(6^n-1)/5,n],{n,90}] (* Harvey P. Dale, Nov 25 2012 *)

PARI

A094921(n) = (((6^n-1)/5)%n); \\ Antti Karttunen, Jan 13 2025