OFFSET
1,2
LINKS
Clark Kimberling, Table of n, a(n) for n = 1..10000
FORMULA
Conjecture: a(n) ~ Pi*n/2. - Vaclav Kotesovec, Oct 09 2014
EXAMPLE
MATHEMATICA
z = 240; v = Table[Floor[Cot[Pi/(2 n)]], {n, 1, z}];
Flatten[Position[Differences[v], 0]] (* A248520 *)
Flatten[Position[Differences[v], 1]] (* A248521 *)
nmax=100; Select[Range[nmax], Floor[Cot[Pi/(2#+2)]]==Floor[Cot[Pi/(2#)]]+1&] (* Vaclav Kotesovec, Oct 09 2014 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Oct 08 2014
STATUS
approved