The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A097927 If a(n-1) is divisible by 2 then a(n) = a(n-1)/2. If a(n-1) is not divisible by 2 then a(n) = 47-(a(n-1)+1)/2; a(0)=1. 0
 1, 46, 23, 35, 29, 32, 16, 8, 4, 2, 1, 46, 23, 35, 29, 32, 16, 8, 4, 2, 1, 46, 23, 35, 29, 32, 16, 8, 4, 2, 1, 46, 23, 35, 29, 32, 16, 8, 4, 2, 1, 46, 23, 35, 29, 32, 16, 8, 4, 2, 1, 46, 23, 35, 29, 32, 16, 8, 4, 2, 1, 46, 23, 35, 29, 32, 16, 8, 4, 2, 1, 46, 23, 35, 29, 32, 16, 8, 4, 2, 1, 46, 23 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,2 COMMENTS The old entry with this sequence number was a duplicate of A097945. Periodic, with period = 10. - Harvey P. Dale, Sep 30 2016 LINKS FORMULA Periodic with period of length 10. MAPLE a:=proc(n) option remember; local k; k:=47; if n=0 then RETURN(1); fi; if a(n-1) mod 2 = 0 then RETURN(a(n-1)/2); fi; RETURN(k-(a(n-1)+1)/2); end; MATHEMATICA NestList[If[EvenQ[#], #/2, 47-(#+1)/2]&, 1, 90] (* or *) PadRight[{}, 90, {1, 46, 23, 35, 29, 32, 16, 8, 4, 2}] (* Harvey P. Dale, Sep 30 2016 *) CROSSREFS Sequence in context: A051161 A260512 A033366 * A033978 A216840 A060958 Adjacent sequences:  A097924 A097925 A097926 * A097928 A097929 A097930 KEYWORD nonn AUTHOR N. J. A. Sloane, Sep 25 2008, based on email from Zak Seidov, May 12 2008 EXTENSIONS Definition corrected by Harvey P. Dale, Sep 30 2016 STATUS approved

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

Last modified August 3 13:05 EDT 2020. Contains 336198 sequences. (Running on oeis4.)