OFFSET
0,1
LINKS
MAPLE
Digits := 100: convert(evalf(sqrt(N)), confrac, 90, 'cvgts'):
MATHEMATICA
ContinuedFraction[Sqrt[147], 300] (* Vladimir Joseph Stephan Orlovsky, Mar 13 2011*)
LinearRecurrence[{0, 1}, {12, 8, 24}, 80] (* or *) PadRight[{12}, 80, {24, 8}] (* Harvey P. Dale, Jun 11 2017 *)
PROG
(Python)
from sympy import sqrt
from sympy.ntheory.continued_fraction import continued_fraction_iterator
def aupton(nn):
gen = continued_fraction_iterator(sqrt(147))
return [next(gen) for i in range(nn+1)]
print(aupton(73)) # Michael S. Branicky, Dec 08 2021
(Python) # second version based on recurrence
def a(n): return 12 if n == 0 else [8, 24][(n-1)%2]
print([a(n) for n in range(74)]) # Michael S. Branicky, Dec 08 2021
CROSSREFS
KEYWORD
nonn,cofr,easy
AUTHOR
STATUS
approved