|
Search: id:A130440
|
|
|
| A130440 |
|
Even pseudoprimes to base 31. |
|
+0
13
|
|
| 6, 10, 30, 66, 946, 3310, 10470, 36370, 60126, 104106, 128766, 170710, 323670, 369370, 398266, 596926, 813430, 1145166, 1494690, 2384866, 5960746, 6376126, 8178346, 18327310, 31380922, 34102630, 37105762, 40796526, 41950966, 41983446
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Robert G. Wilson v, Table of n, a(n) for n = 1..87.
Eric Weisstein's World of Mathematics, Fermat Pseudoprime.
Index entries for sequences related to pseudoprimes
|
|
MATHEMATICA
|
Do[ f=PowerMod[ 31, 2n-1, 2n ]; If[ f==1, Print[ 2n ] ], {n, 2, 500000} ]
lst = {}; Do[ If[ PowerMod[31, 2n - 1, 2n] == 1, AppendTo[lst, 2n]], {n, 2, 2^31}]; lst - from Robert G. Wilson v (rgwv(at)rgwv.com), Jun 01 2007
|
|
CROSSREFS
|
Cf. A020159, A006935, A130433, A090082, A090083, A090084, A090085, A130434, A130435, A130436, A130437, A130438, A130439, A130441, A130442, A130443.
Sequence in context: A103767 A025129 A093559 this_sequence A137272 A121801 A032740
Adjacent sequences: A130437 A130438 A130439 this_sequence A130441 A130442 A130443
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Alexander Adamchuk (alex(AT)kolmogorov.com), May 26 2007
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(at)rgwv.com), Jun 01 2007
|
|
|
Search completed in 0.002 seconds
|
