A176176 Numbers k such that 2^(k-1) == 4^(k-1) (mod k).
1, 2, 3, 4, 5, 7, 8, 11, 13, 16, 17, 19, 23, 28, 29, 31, 32, 37, 41, 43, 47, 53, 59, 61, 64, 67, 71, 73, 79, 83, 89, 97, 101, 103, 107, 109, 112, 113, 127, 128, 131, 137, 139, 149, 151, 157, 163, 167
Offset: 1
Keywords
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Select[Range[200],PowerMod[2,#-1,#]==PowerMod[4,#-1,#]&] (* Harvey P. Dale, Nov 10 2011 *)
Extensions
Extended by D. S. McNeil, Dec 07 2010
Comments