OFFSET
1,1
COMMENTS
Computed terms are prime.
Conjecture: a(n) == 1 mod 406 for n > 5. - Chai Wah Wu, Oct 07 2020
MATHEMATICA
Select[Range[3, 10^7, 2], PowerMod[6, (# - 1)/2, (t = #*(# - 1)/2)] == t - 1 &] (* Amiram Eldar, Sep 24 2020 *)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Benoit Cloitre, Sep 24 2020
EXTENSIONS
a(6)-a(13) from Amiram Eldar, Sep 24 2020
STATUS
approved