login
A112984
Numbers k such that 2^k mod k-1 is odd.
0
4, 10, 16, 28, 36, 50, 56, 76, 82, 106, 116, 120, 122, 134, 144, 162, 172, 176, 188, 190, 204, 216, 218, 232, 236, 244, 248, 254, 256, 262, 274, 280, 290, 296, 298, 300, 324, 334, 336, 344, 352, 364, 372, 396, 404, 406, 414, 426, 438, 452, 456, 474, 476, 484
OFFSET
1,1
MATHEMATICA
Select[ 2Range[250], OddQ[ PowerMod[2, #, #-1]] &] (* Robert G. Wilson v, Oct 10 2005 *)
CROSSREFS
Sequence in context: A175703 A132227 A036063 * A343907 A191115 A073121
KEYWORD
nonn
AUTHOR
Paul Barry, Oct 08 2005
EXTENSIONS
More terms from Robert G. Wilson v, Oct 10 2005
STATUS
approved