OFFSET
1,1
COMMENTS
Suggested by a problem in a web page by Hojoo Lee entitled "Challenging problems in number theory". However, the page no longer exists.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
Index entries for linear recurrences with constant coefficients, signature (2,-2,2,-2,2,-2,2,-2,2,-2,2,-2,2,-2,2,-1).
FORMULA
a(n+1)-a(n) is the 16-periodic sequence (24, 13, 33, 57, 2, 6, 12, 7, 3, 1, 38, 5, 9, 26, 15, 21).
MATHEMATICA
Select[Range[1000], PowerMod[3, #, 17] == Mod[#, 17] &] (* Amiram Eldar, May 14 2022 *)
PROG
(PARI) isok(n) = Mod(3, 17)^n == Mod(n, 17); \\ Michel Marcus, Dec 02 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Apr 16 2003
STATUS
approved