login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Positive integers n such that 2^n == 16 (mod n).
11

%I #24 Dec 03 2021 11:40:28

%S 1,2,4,6,7,8,12,16,20,24,28,40,44,48,52,60,68,76,80,92,112,116,120,

%T 124,148,154,164,172,188,204,208,212,236,240,244,264,268,280,284,292,

%U 316,332,340,356,364,388,404,412,428,436,452,508,520,524,548,556,596

%N Positive integers n such that 2^n == 16 (mod n).

%C Odd terms are given by A033984.

%C For all m, 2^A128121(m)-1 belongs to this sequence.

%H T. D. Noe, <a href="/A015924/b015924.txt">Table of n, a(n) for n = 1..1000</a>

%H OEIS Wiki, <a href="/wiki/2^n mod n">2^n mod n</a>

%t Select[Range[1000], Mod[2^# - 2^4, #] == 0 &] (* _T. D. Noe_, Aug 17 2012 *)

%t Join[{1,2,4,6,7,8,12,16},Select[Range[600],PowerMod[2,#,#]==16&]] (* _Harvey P. Dale_, Dec 03 2021 *)

%Y Contains A050992 as a subsequence.

%Y Cf. A033984, A173138.

%K nonn

%O 1,2

%A _Robert G. Wilson v_

%E Edited and terms 1,2,4,6,7,8,12,16 prepended by _Max Alekseyev_, Jul 29 2011