login
A063536
a(n) = floor(cotangent(n)^3).
1
0, -1, -346, 0, -1, -41, 1, -1, -11, 3, -1, -4, 10, 0, -2, 36, 0, -1, 287, 0, -1, 1441871, 0, -1, -421, 0, -1, -45, 1, -1, -12, 3, -1, -5, 9, 0, -2, 33, 0, -1, 241, 0, -1, 180191, 0, -1, -518, 0, -1, -50, 1, -1, -13, 3, -1, -5, 8, 0, -2, 30, 0, -1, 204, 0, -1, 53369, 0, -1, -649, 0, -1, -56, 1, -1, -14, 3, -1, -5, 8, 0, -2, 27, 0, -1
OFFSET
1,3
LINKS
PROG
(PARI) j=[]; for(n=1, 100, j=concat(j, floor(cotan(n)^3))); j
(PARI) { default(realprecision, 50); for (n=1, 1000, write("b063536.txt", n, " ", floor(cotan(n)^3)) ) } \\ Harry J. Smith, Aug 25 2009
CROSSREFS
Sequence in context: A138043 A048904 A139266 * A045102 A225934 A287700
KEYWORD
sign
AUTHOR
Jason Earls, Aug 10 2001
STATUS
approved