cp's OEIS Frontend

A007450 Decimal expansion of 1/17.

%I A007450 M3772 #35 Sep 08 2022 08:44:35
%S A007450 0,5,8,8,2,3,5,2,9,4,1,1,7,6,4,7,0,5,8,8,2,3,5,2,9,4,1,1,7,6,4,7,0,5,
%T A007450 8,8,2,3,5,2,9,4,1,1,7,6,4,7,0,5,8,8,2,3,5,2,9,4,1,1,7,6,4,7,0,5,8,8,
%U A007450 2,3,5,2,9,4,1,1,7,6,4,7,0,5,8,8,2,3,5
%N A007450 Decimal expansion of 1/17.
%C A007450 Period 16: repeat [0, 5, 8, 8, 2, 3, 5, 2, 9, 4, 1, 1, 7, 6, 4, 7]. - _Joerg Arndt_, Mar 25 2013
%D A007450 H. Rademacher and O. Toeplitz, Von Zahlen und Figuren (Springer 1930, reprinted 1968), ch. 19, 'Die periodischen Dezimalbrueche'. [From _Reinhard Zumkeller_, Oct 06 2008]
%D A007450 N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
%H A007450 Vincenzo Librandi, <a href="/A007450/b007450.txt">Table of n, a(n) for n = 0..5000</a>
%H A007450 R. K. Hoeflin, <a href="http://www.eskimo.com/~miyaguch/mega.html">Mega Test</a>
%H A007450 <a href="/index/Rec#order_09">Index entries for linear recurrences with constant coefficients</a>, signature (1,0,0,0,0,0,0,-1,1).
%F A007450 From _Reinhard Zumkeller_, Oct 06 2008: (Start)
%F A007450 A028416(4)=17; A002371(A049084(17)) = A002371(7)=16;
%F A007450 a(n+16) = a(n), a(n+16/2) = 9 - a(n). (End)
%F A007450 G.f.: -x*(7*x^7-3*x^6+2*x^5+x^4-6*x^3+3*x+5)/((x-1)*(x^8+1)). - _Colin Barker_, Aug 15 2012
%t A007450 CoefficientList[Series[-x (7 x^7 - 3 x^6 + 2 x^5 + x^4 - 6 x^3 + 3 x + 5)/((x - 1) (x^8+1)), {x, 0, 100}], x] (* _Vincenzo Librandi_, Mar 25 2013 *)
%o A007450 (Magma) I:=[0, 5, 8, 8, 2, 3, 5, 2, 9]; [n le 9 select I[n] else Self(n-1)-Self(n-8)+Self(n-9): n in [1..100]]; // _Vincenzo Librandi_, Mar 25 2013
%o A007450 (PARI) a(n)=[0,5,8,8,2,3,5,2,9,4,1,1,7,6,4,7][n%16+1]; /* _Joerg Arndt_, Mar 25 2013 */
%K A007450 cons,nonn,easy
%O A007450 0,2
%A A007450 _N. J. A. Sloane_