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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A284819 Positions of 1 in A284817. 3
 3, 7, 9, 12, 15, 19, 21, 25, 27, 30, 34, 36, 39, 43, 45, 48, 51, 55, 57, 61, 63, 66, 69, 73, 75, 79, 81, 84, 88, 90, 93, 96, 100, 102, 106, 108, 111, 115, 117, 120, 123, 127, 129, 133, 135, 138, 142, 144, 147, 151, 153, 156, 159, 163, 165, 169, 171, 174, 177 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS This sequence and A284818 show that the nonperiodic complementary sequences A284776 and A284777 stay close to the odd positive integers, A005408, and even positive integers, A005843, respectively. LINKS Clark Kimberling, Table of n, a(n) for n = 1..10000 EXAMPLE A284817 = (0,0,1,0,0,0,1,0,1,0,0,1,0,0...), so that a(1) = 3, a(2) = 7, a(3) = 9. MATHEMATICA s = Nest[Flatten[# /. {0 -> {0, 1}, 1 -> {0, 0, 1, 1}}] &, {0}, 7]; (* A284775 *) u = Flatten[Position[s, 0]] ; (* A284776 *) v = Flatten[Position[s, 1]]; (* A284777 *) t = Table[2 n - 1 - u[[n]], {n, 1, 200}]; (* A284817 *) Flatten[Position[t, 0]]; (* A284818 *) Flatten[Position[t, 1]]; (* A284819 *) CROSSREFS Cf. A005843, A284776, A284818. Sequence in context: A366529 A190366 A342699 * A190742 A289906 A190752 Adjacent sequences: A284816 A284817 A284818 * A284820 A284821 A284822 KEYWORD nonn,easy AUTHOR Clark Kimberling, Apr 15 2017 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.

Last modified April 25 11:03 EDT 2024. Contains 371967 sequences. (Running on oeis4.)