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!)
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: A110404 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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified August 15 18:38 EDT 2022. Contains 356148 sequences. (Running on oeis4.)