|
| |
|
|
A130436
|
|
Even pseudoprimes to base 17.
|
|
13
| |
|
|
4, 8, 16, 1228, 4912, 5662, 11476, 76798, 168904, 387676, 938792, 1003276, 1147576, 1415044, 1419856, 1832836, 2297296, 3976624, 5470126, 6376126, 7309576, 9649624, 12423676, 13193776, 14026888, 14652496, 19136272, 20570936, 24604696
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Robert G. Wilson v, Table of n, a(n) for n = 0..119.
Eric Weisstein's World of Mathematics, Fermat Pseudoprime.
Index entries for sequences related to pseudoprimes
|
|
|
MATHEMATICA
| lst = {}; Do[ If[ PowerMod[17, 2n - 1, 2n] == 1, AppendTo[lst, 2n]], {n, 2, 2*10^9}]; lst - Robert G. Wilson v (rgwv(at)rgwv.com), Jun 01 2007
|
|
|
CROSSREFS
| Cf. A020145, A006935, A130433, A090082, A090083, A090084, A090085, A130434, A130435, A130437, A130438, A130439, A130440, A130441, A130442, A130443.
Sequence in context: A038238 A023376 A038110 * A090804 A074025 A031462
Adjacent sequences: A130433 A130434 A130435 * A130437 A130438 A130439
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Alexander Adamchuk (alex(AT)kolmogorov.com), May 26 2007
|
|
|
EXTENSIONS
| a(13)-a(119) from Robert G. Wilson v (rgwv(at)rgwv.com), Jun 01 2007
|
| |
|
|
