|
%I #9 Sep 16 2015 13:52:46
%S 1,2,4,4,7,7,10,8,13,12,16,12,19,17,25,16,25,23,28,21,31,27,34,24,40,
%T 32,43,29,43,42,46,32,49,42,59,38,55,47,58,40,61,59,64,46,79,57,70,48,
%U 74,63,76,55,79,73,91,56,85,72,88,63,91,77,103,64,106,88,100,72,103,93,106
%N a(n) = n-th positive integer which is coprime to (2^n +1). Also, a(n) = final term of row n in triangle A132082.
%t a = {1}; Do[i = 1; c = 0; While[c < n,If[GCD[i, 2^n + 1] == 1, c++ ]; i++ ]; AppendTo[a, i - 1], {n, 2, 80}]; a (* _Stefan Steinerberger_, Dec 26 2007 *)
%Y Cf. A132082, A131880.
%K nonn
%O 1,2
%A _Leroy Quet_, Aug 09 2007
%E More terms from _Stefan Steinerberger_, Dec 26 2007
|
