The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A081780 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing all changes.

A081780

Continued cotangent for square root of 3.
(history; published version)

#9 by Russ Cox at Fri Mar 30 18:39:16 EDT 2012

AUTHOR

_Benoit Cloitre (benoit7848c(AT)orange.fr), _, Apr 10 2003

Discussion

Fri Mar 30

18:39

OEIS Server: https://oeis.org/edit/global/216

#8 by N. J. A. Sloane at Sun Jun 29 03:00:00 EDT 2008

KEYWORD

nonn,new

nonn

AUTHOR

Benoit Cloitre (abmtbenoit7848c(AT)wanadooorange.fr), Apr 10 2003

#7 by N. J. A. Sloane at Wed Dec 06 03:00:00 EST 2006

KEYWORD

nonn,cons,new

nonn

#6 by N. J. A. Sloane at Fri Feb 24 03:00:00 EST 2006

FORMULA

sqrt(3)=cot(sum(n>=0, n, (-1)^n*acot(a(n))); let b(0)=sqrt(3), b(n)=(b(n-1)*floor(b(n-1))+1)/(b(n-1)-floor(b(n-1)) then a(n)=floor(b(n))

KEYWORD

nonn,cons,new

#5 by N. J. A. Sloane at Wed Sep 21 03:00:00 EDT 2005

KEYWORD

nonn,cons,new

AUTHOR

Benoit Cloitre (abcloitreabmt(AT)modulonetwanadoo.fr), Apr 10 2003

#4 by N. J. A. Sloane at Tue Jul 19 03:00:00 EDT 2005

KEYWORD

nonn,cons,new

AUTHOR

Benoit Cloitre (abcloitre(AT)wanadoomodulonet.fr), Apr 10 2003

#3 by N. J. A. Sloane at Thu Feb 19 03:00:00 EST 2004

PROG

(PARI) ?bn=vector(100); b(n)=if(n<0, 0, bn[n]); bn[1]=sqrt(3); ?for(n=2, 10, bn[n]=(b(n-1)*floor(b(n-1))+1)/(b(n-1)-floor(b(n-1)))) ?a(n)=floor(b(n+1))

KEYWORD

nonn,cons,new

#2 by N. J. A. Sloane at Sat Sep 13 03:00:00 EDT 2003

FORMULA

sqrt(3)=cot(sum(n>=0,n,(-1)^n*acot(a(n))) ; let b(0)=sqrt(3), b(n)=(b(n-1)*floor(b(n-1))+1)/(b(n-1)-floor(b(n-1)) then a(n)=floor(b(n))

KEYWORD

nonn,cons,new

#1 by N. J. A. Sloane at Fri May 16 03:00:00 EDT 2003

NAME

Continued cotangent for square root of 3.

DATA

1, 3, 16, 405, 672320, 1352290629546, 4817801789405093582066881, 125242334906904794515426191021121381708761081802849, 48098205042808280233282792304806428848378744166690329294696649253234314988369597043479633480454760546

OFFSET

0,2

FORMULA

sqrt(3)=cot(sum(n>=0,n,(-1)^n*acot(a(n))) ; let b(0)=sqrt(3), b(n)=(b(n-1)*floor(b(n-1))+1)/(b(n-1)-floor(b(n-1)) then a(n)=floor(b(n))

PROG

(PARI) ?bn=vector(100); b(n)=if(n<0, 0, bn[n]); bn[1]=sqrt(3); ?for(n=2, 10, bn[n]=(b(n-1)*floor(b(n-1))+1)/(b(n-1)-floor(b(n-1)))) ?a(n)=floor(b(n+1))

CROSSREFS

Cf. A002666, A002667.

KEYWORD

nonn,cons

AUTHOR

Benoit Cloitre (abcloitre(AT)wanadoo.fr), Apr 10 2003

STATUS

approved