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 A037448 #29 Dec 26 2024 18:51:21 %S A037448 0,-1,-8,0,-1,-4,1,-1,-3,1,-1,-2,2,0,-2,3,0,-1,6,0,-1,112,0,-1,-8,0, %T A037448 -1,-4,1,-1,-3,1,-1,-2,2,0,-2,3,0,-1,6,0,-1,56,0,-1,-9,0,-1,-4,1,-1, %U A037448 -3,1,-1,-2,2,0,-2,3,0,-1,5,0,-1,37,0,-1,-9,0,-1,-4,1,-1,-3,1,-1,-2,2,0,-2,3,0,-1,5,0,-1,28,0,-1,-10,0,-1,-4,1,-1,-3 %N A037448 a(n) = floor(cot(n)). %C A037448 Contains all integers infinitely often. - _Charles R Greathouse IV_, Aug 06 2012 %H A037448 T. D. Noe, <a href="/A037448/b037448.txt">Table of n, a(n) for n = 1..1000</a> %t A037448 Floor[Cot[Range[100]]] (* _Harvey P. Dale_, Dec 26 2024 *) %o A037448 (PARI) v=[]; for(n=1,260,v=concat(v,floor(cotan(n)))); v %o A037448 (Magma) [Floor(Cot(n)): n in [1..100]]; // _Vincenzo Librandi_, Jun 15 2015 %Y A037448 Cf. A195911, A195910, A000503, A005657, A000493, A000480, A000494, A000484. %K A037448 sign %O A037448 1,3 %A A037448 _Jason Earls_, Jun 30 2001 %E A037448 a(44) corrected by _T. D. Noe_, Jan 21 2008