|
%I #7 Jul 07 2016 04:10:37
%S 1,2,3,4,5,6,7,8,9,10,11,12,13,15,16,17,18,19,20,21,23,24,25,27,29,31,
%T 32,33,34,35,36,37,39,40,41,43,45,47,48,49,51,53,55,57,59,61,63,64,65,
%U 66,67,68,69,71,72,73,75,77,79,80,81,83,85,87,89,91
%N Numbers n that are coprime to the numerator of zeta(2*n)/(Pi^(2*n)).
%C Complement of A266214.
%H Vincenzo Librandi, <a href="/A272477/b272477.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range@200, CoprimeQ[#, Numerator[Zeta[2 #]/Pi^(2 #)]] &]
%Y Cf. A266214.
%K nonn,easy
%O 1,2
%A _Vincenzo Librandi_, May 03 2016
|
