login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A145181
Continued cotangent recurrence a(n+1)=a(n)^3+3*a(n) and a(1)=7
11
7, 364, 48229636, 112186849649044142700364, 1411971263214164889494039458947084336929208169473485667118006013929636
OFFSET
1,1
COMMENTS
General formula for continued cotangent recurrences type:
a(n+1)=a(n)3+3*a(n) and a(1)=k is following:
a(n)=Floor[((k+Sqrt[k^2+4])/2)^(3^(n-1))]
k=1 see A006267
k=2 see A006266
k=3 see A006268
k=4 see A006267(n+1)
k=5 see A006269
k=6 see A145180
k=7 see A145181
k=8 see A145182
k=9 see A145183
k=10 see A145184
k=11 see A145185
k=12 see A145186
k=13 see A145187
k=14 see A145188
k=15 see A145189
FORMULA
a(n+1)=a(n)^3 + 3*a(n) and a(1)=7
a(n)=Floor[((7+Sqrt[7^2+4])/2)^(3^(n-1))]
MATHEMATICA
a = {}; k = 7; Do[AppendTo[a, k]; k = k^3 + 3 k, {n, 1, 6}]; a
or
Table[Floor[((7 + Sqrt[53])/2)^(3^(n - 1))], {n, 1, 5}] (*Artur Jasinski*)
KEYWORD
nonn
AUTHOR
Artur Jasinski, Oct 03 2008
STATUS
approved