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!)
A185038 Positions at which A090895 (a(1) = 1 then a(n) = a(n-1)/2 if a(n-1) is even, a(n) = a(n-1) + n otherwise) reach the value of 1. 2
1, 8, 15, 64, 7069, 229826, 62906548, 104509874538, 209233407362, 474536678820, 2653613575299, 14802269029898 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
COMMENTS
It seems that this sequence is infinite.
LINKS
EXAMPLE
Example: the sequence a(1)=1 then a(n)=a(n-1)/2 if a(n-1) is even, a(n) = a(n-1) + n otherwise goes 1, 3, 6, 3, 8, 4, 2, 1, 10, 5, 16, 8, 4, 2, 1, etc... which has ones at 1, 8, 15, 64, etc...
PROG
(Haskell)
import Data.List (elemIndices)
a185038 n = a185038_list !! (n-1)
a185038_list = map (+ 1) $ elemIndices 1 a090895_list
-- Reinhard Zumkeller, Mar 02 2012
CROSSREFS
Cf. A090895.
Sequence in context: A166704 A161342 A048732 * A193490 A015442 A253211
KEYWORD
more,hard,nonn
AUTHOR
Sergio Pimentel, Mar 01 2012
EXTENSIONS
a(8)-a(12) from Hiroaki Yamanouchi, Oct 04 2014
STATUS
approved

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 28 18:04 EDT 2024. Contains 371254 sequences. (Running on oeis4.)