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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A234810 Primes p such that p^2 divides 14^(p-1) - 1. 10
 29, 353, 7596952219 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS Base 14 Wieferich primes. LINKS Amir Akbary and Sahar Siavashi, The Largest Known Wieferich Numbers, INTEGERS, 18(2018), A3. See Table 1 p. 5. P. L. Montgomery, New solutions of a^p-1 == 1 (mod p^2), Math. Comp., 61 (203), 361-363 MATHEMATICA Select[Prime[Range[200]], Divisible[14^(# - 1) - 1, #^2] &] (* Alonso del Arte, Apr 20 2014 *) Select[Prime[Range[200]], PowerMod[14, #-1, #^2]==1&] (* The program generates the first two terms of the sequence. To generate the third term, increase the Range constant to 351*10^5, but the program will take a long time to run. *) (* Harvey P. Dale, Jun 19 2021 *) PROG (PARI) N=10^9; default(primelimit, N); forprime(n=2, N, if(Mod(14, n^2)^(n-1)==1, print1(n, ", "))); CROSSREFS Cf. A001220. Sequence in context: A156640 A239743 A022689 * A077516 A142278 A281059 Adjacent sequences:  A234807 A234808 A234809 * A234811 A234812 A234813 KEYWORD nonn,hard,bref,more AUTHOR Felix Fröhlich, Apr 19 2014 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.

Last modified May 28 18:24 EDT 2022. Contains 354122 sequences. (Running on oeis4.)