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!)
A130439 Even pseudoprimes to base 29. 14
4, 14, 28, 52, 268, 364, 1876, 3484, 5356, 7294, 24388, 66788, 283276, 286492, 339556, 404236, 860692, 1153684, 1381132, 1478764, 1696708, 2073722, 2182726, 2222122, 4922164, 7790146, 8200036, 9679138, 10881052, 14863516, 15476266 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
Robert G. Wilson v, Table of n, a(n) for n = 1..121.
Eric Weisstein's World of Mathematics, Fermat Pseudoprime.
MATHEMATICA
Do[ f=PowerMod[ 29, 2n-1, 2n ]; If[ f==1, Print[ 2n ] ], {n, 2, 500000} ]
lst = {}; Do[ If[ PowerMod[17, 2n - 1, 2n] == 1, AppendTo[lst, 2n]], {n, 2, 2^31}]; lst (* Robert G. Wilson v, Jun 01 2007 *)
CROSSREFS
Sequence in context: A200546 A304342 A066907 * A289179 A033690 A316213
KEYWORD
nonn
AUTHOR
Alexander Adamchuk, May 26 2007
EXTENSIONS
More terms from Robert G. Wilson v, Jun 01 2007
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 March 29 04:23 EDT 2024. Contains 371264 sequences. (Running on oeis4.)