This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A246046 #9 Aug 24 2014 17:38:33
%S A246046 2,3,5,6,8,9,11,12,13,15,16,18,19,21,22,24,25,27,28,30,31,33,34,35,37,
%T A246046 38,40,41,43,44,46,47,49,50,52,53,55,56,57,59,60,62,63,65,66,68,69,71,
%U A246046 72,74,75,77,78,79,81,82,84,85,87,88,90,91,93,94,96
%N A246046 [Pi((n + Pi/2)/(Pi -1) - 1/2)]; complement of A062389.
%C A246046 In general, the complement of a nonhomogenous Beatty sequence [n*r + h] is given by [n*s + h - h*s], where s = r/(r - 1).
%C A246046 A246046 also gives the nonnegative integers k such that tan(k) < tan(k + 1). The complementary sequence, A062389, gives the nonnegative integers k such that tan(k) > tan(k + 1).
%t A246046 r = Pi; s = Pi/(Pi - 1); h = -Pi/2; z = 120;
%t A246046 u = Table[Floor[n*r + h], {n, 1, z}] (* A062389 *)
%t A246046 v = Table[Floor[n*s + h - h*s], {n, 1, z}] (* A246046 *)
%Y A246046 Cf. A062389.
%K A246046 nonn,easy
%O A246046 1,1
%A A246046 _Clark Kimberling_, Aug 24 2014