login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A271221
Smallest Fermat pseudoprime k to all bases b = 2, 3, 4, ..., n.
6
341, 1105, 1105, 1729, 1729, 29341, 29341, 29341, 29341, 29341, 29341, 162401, 162401, 162401, 162401, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601, 252601
OFFSET
2,1
COMMENTS
a(n) is the smallest composite k such that b^(k-1) == 1 (mod (b-1)k) for every b = 2, 3, 4, ..., n. For more comments, see A083876 and A300629. - Max Alekseyev and Thomas Ordowski, Apr 29 2018
PROG
(PARI) a(n) = forcomposite(c=1, , my(i=0); for(b=2, n, if(Mod(b, c)^(c-1)==1, i++)); if(i==n-1, return(c)));
CROSSREFS
KEYWORD
nonn
AUTHOR
Felix Fröhlich, Apr 02 2016
EXTENSIONS
Edited by Thomas Ordowski, Apr 29 2018
Corrected a typo within the initial terms by Jens Ahlström, Apr 23 2024
STATUS
approved