login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A020180 Pseudoprimes to base 52. 1
51, 85, 159, 265, 561, 671, 901, 1513, 1541, 1891, 2413, 2465, 2653, 2703, 2705, 3111, 3201, 3421, 4081, 4187, 4505, 5151, 6307, 6433, 6533, 6601, 6943, 7201, 8365, 8911, 9197, 9773, 9911, 10349, 10585, 11305, 12403, 13019, 13333, 14491, 15051, 15841 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
COMMENTS
Composite numbers n such that 52^(n-1) == 1 (mod n). - Michel Lagneau, Feb 18 2012
LINKS
MATHEMATICA
base = 52; t = {}; n = 1; While[Length[t] < 100, n++; If[! PrimeQ[n] && PowerMod[base, n-1, n] == 1, AppendTo[t, n]]]; t (* T. D. Noe, Feb 21 2012
Select[Range[16000], CompositeQ[#]&&PowerMod[52, #-1, #]==1&] (* Harvey P. Dale, May 11 2024 *)
CROSSREFS
Cf. A001567 (pseudoprimes to base 2).
Sequence in context: A039474 A253020 A351026 * A049328 A075894 A229274
KEYWORD
nonn
AUTHOR
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 21 05:28 EDT 2024. Contains 374463 sequences. (Running on oeis4.)