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
a(14)-a(15) from Bill McEachen, Jul 21 2025
a(16)-a(18) from Bill McEachen, Aug 03 2025
STATUS
approved
