|
%I #16 Mar 21 2013 06:36:42
%S 1,4,7,10,13,16,19,22,26,29,32,35,38,41,44,48,51,54,57,60,63,66,70,73,
%T 76,79,82,85,88,92,95,98,101,104,107,110,114,117,120,123,126,129,132,
%U 136,139,142,145,148,151,154,158,161,164,167
%N a(n) = n-th positive integer k such that tan(k-1) <= 0 and tan(k) > 0.
%C Gives integer solutions >1 to the equation x=ceiling(r*floor(x/r)) where r=Pi. - _Benoit Cloitre_, Feb 14 2004
%F a(n) = ceiling(Pi*(n-1)) for n>1. - _Benoit Cloitre_, Feb 14 2004
%o (PARI) lista(m) = {for (i=1, m, if ((tan(i-1)<=0) && (tan(i) > 0), print1(i, ", ")););} \\ _Michel Marcus_, Mar 21 2013
%K nonn
%O 1,2
%A _Clark Kimberling_
|
