OFFSET
1,1
COMMENTS
Previous name was "Terms of A047713 that are congruent to +-1 mod 8".
REFERENCES
Richard K. Guy, Unsolved Problems in Number Theory, 3rd Edition, Springer, 2004, Section A12, pp. 44-50.
Hans Riesel, Prime numbers and computer methods for factorization, Progress in Mathematics, Vol. 57, Birkhäuser, Boston, 1985.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..828 from Jianing Song using data from A047713)
MATHEMATICA
Select[Range[10^5], MemberQ[{1, 7}, Mod[#, 8]] && CompositeQ[#] && PowerMod[2, (# - 1)/2, #] == 1 &] (* Amiram Eldar, Nov 06 2023 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
This sequence appeared as M5461 in Sloane-Plouffe (1995), but was later mistakenly declared to be an erroneous form of A047713. Thanks to Jianing Song for providing the correct definition. - N. J. A. Sloane, Sep 17 2018
Formal definition by Jianing Song, Sep 18 2018
STATUS
approved