[go: up one dir, main page]

login
A124965
Odd values of 2^n mod n corresponding to the n's given in A015911.
7
7, 17, 43, 37, 13, 17, 57, 53, 85, 53, 63, 151, 93, 161, 107, 173, 67, 193, 251, 239, 43, 233, 107, 155, 161, 105, 81, 179, 233, 103, 239, 143, 125, 179, 349, 161, 305, 89, 257, 83, 143, 279, 197, 161, 371, 35, 15, 449, 253, 437, 403, 407, 255, 279, 353
OFFSET
1,1
FORMULA
a(n) = A015910(A015911(n)).
MATHEMATICA
Select[PowerMod[2, #, #]&/@Range[550], OddQ] (*Ray Chandler, Nov 20 2011*)
CROSSREFS
Cf. A015911.
Sequence in context: A194772 A193546 A268255 * A253973 A200080 A347124
KEYWORD
nonn
AUTHOR
Zak Seidov, Nov 14 2006, corrected Nov 25 2006
EXTENSIONS
Edited by Ray Chandler at the suggestion of Jon E. Schoenfield, Nov 20 2011
STATUS
approved