login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A118862 Start with 1 and repeatedly place the first digit at the end of the number and add 15. 0

%I #10 Jun 13 2015 00:52:06

%S 1,16,76,82,43,49,109,106,76,82,43,49,109,106,76,82,43,49,109,106,76,

%T 82,43,49,109,106,76,82,43,49,109,106,76,82,43,49,109,106,76,82,43,49,

%U 109,106,76,82,43,49,109,106,76,82,43,49,109,106,76,82,43,49,109,106,76,82

%N Start with 1 and repeatedly place the first digit at the end of the number and add 15.

%C After 2 steps the sequence enters a cycle of length 6.

%H <a href="/index/Rec#order_06">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,0,0,1).

%F a(n) = a(n-6) for n>8. - _Colin Barker_, Oct 02 2014

%F G.f.: -x*(90*x^7+108*x^6+49*x^5+43*x^4+82*x^3+76*x^2+16*x+1) / ((x-1)*(x+1)*(x^2-x+1)*(x^2+x+1)). - _Colin Barker_, Oct 02 2014

%t NestList[FromDigits[RotateLeft[IntegerDigits[#]]]+15&,1,70] (* or *) PadRight[ {1,16},70,{109,106,76,82,43,49}] (* _Harvey P. Dale_, Sep 20 2014 *)

%o (PARI) Vec((90*x^7+108*x^6+49*x^5+43*x^4+82*x^3+76*x^2+16*x+1)/(-x^6+1) + O(x^100)) \\ _Colin Barker_, Oct 02 2014

%K base,nonn,easy

%O 1,2

%A Luc Stevens (lms022(AT)yahoo.com), May 24 2006

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 3 16:49 EST 2024. Contains 370512 sequences. (Running on oeis4.)