OFFSET
1,1
COMMENTS
Also, smallest prime p such that 1/p has senary period n.
LINKS
Max Alekseyev, Table of n, a(n) for n = 1..436 (first 420 terms from Sean A. Irvine)
PROG
(PARI) listap(nn) = {prf = []; for (n=1, nn, vp = (factor(6^n-1)[, 1])~; f = setminus(Set(vp), Set(prf)); prf = concat(prf, f); print1(vecmin(Vec(f)), ", "); ); }
CROSSREFS
KEYWORD
nonn
AUTHOR
Sean A. Irvine, Dec 28 2024
STATUS
approved