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 A041081 #21 Jul 09 2025 00:14:40 %S A041081 1,1,6,7,90,97,575,672,8639,9311,55194,64505,829254,893759,5298049, %T A041081 6191808,79599745,85791553,508557510,594349063,7640746266,8235095329, %U A041081 48816222911,57051318240,733432041791,790483360031,4685848841946,5476332201977,70401835265670 %N A041081 Denominators of continued fraction convergents to sqrt(47). %H A041081 Vincenzo Librandi, <a href="/A041081/b041081.txt">Table of n, a(n) for n = 0..200</a> %H A041081 <a href="/index/Rec">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,96,0,0,0,-1). %F A041081 G.f.: -(x^2-x-1)*(x^4+7*x^2+1) / (x^8-96*x^4+1). - _Colin Barker_, Nov 12 2013 %F A041081 a(n) = 96*a(n-4) - a(n-8). - _Vincenzo Librandi_, Dec 11 2013 %t A041081 Table[Denominator[FromContinuedFraction[ContinuedFraction[Sqrt[47],n]]],{n,1,50}] (* _Vladimir Joseph Stephan Orlovsky_, Mar 22 2011 *) %t A041081 CoefficientList[Series[(1 + x + 6 x^2 + 7 x^3 - 6 x^4 + x^5 - x^6)/(x^8 - 96 x^4 + 1), {x, 0, 30}], x] (* _Vincenzo Librandi_, Dec 11 2013 *) %o A041081 (Magma) I:=[1, 1, 6, 7, 90, 97, 575, 672]; [n le 8 select I[n] else 96*Self(n-4)-Self(n-8): n in [1..40]]; // _Vincenzo Librandi_, Dec 11 2013 %Y A041081 Cf. A010501, A041080. %K A041081 nonn,cofr,easy,frac %O A041081 0,3 %A A041081 _N. J. A. Sloane_ %E A041081 More terms from _Colin Barker_, Nov 12 2013