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!)
 A285307 Positions of 1 in A285305; complement of A285306. 3

%I

%S 1,4,5,7,9,12,13,16,17,19,22,23,25,28,29,31,33,36,37,40,41,43,45,48,

%T 49,52,53,55,58,59,61,63,66,67,70,71,73,76,77,79,81,84,85,88,89,91,94,

%U 95,97,100,101,103,105,108,109,112,113,115,117,120,121,124

%N Positions of 1 in A285305; complement of A285306.

%C Let s(n) = 2n - a(n). It appears that s(n) is a 01-sequence with 0 in positions given by A189660 and 1 in positions given by A189665.

%H Clark Kimberling, <a href="/A285307/b285307.txt">Table of n, a(n) for n = 1..10000</a>

%e As a word, A285305 = 1001101..., in which 1 is in positions 1,4,5,7,9,...

%t s = Nest[Flatten[# /. {0 -> {1, 0}, 1 -> {0, 1, 1, 1}}] &, {0}, 10]; (* A285274 *)

%t Flatten[Position[s, 0]]; (* A285275 *)

%t Flatten[Position[s, 1]]; (* A285276 *)

%Y Cf. A189660, A189665, A285305, A285306.

%K nonn,easy

%O 1,2

%A _Clark Kimberling_, Apr 25 2017

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 January 26 09:38 EST 2021. Contains 340435 sequences. (Running on oeis4.)