[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Revision History for A287124 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing all changes.
Positions of 2 in A287121.
(history; published version)
#5 by N. J. A. Sloane at Tue May 23 14:32:16 EDT 2017
STATUS

reviewed

approved

#4 by Anton Mosunov at Tue May 23 13:12:47 EDT 2017
STATUS

proposed

reviewed

#3 by Clark Kimberling at Tue May 23 10:05:49 EDT 2017
STATUS

editing

proposed

#2 by Clark Kimberling at Mon May 22 21:53:02 EDT 2017
NAME

allocated for Clark KimberlingPositions of 2 in A287121.

DATA

1, 3, 7, 9, 16, 20, 22, 26, 28, 35, 45, 49, 51, 58, 62, 64, 68, 70, 77, 81, 83, 87, 89, 96, 106, 110, 112, 119, 129, 139, 143, 145, 152, 156, 158, 162, 164, 171, 181, 185, 187, 194, 198, 200, 204, 206, 213, 217, 219, 223, 225, 232, 242, 246, 248, 255, 259

OFFSET

1,2

LINKS

Clark Kimberling, <a href="/A287124/b287124.txt">Table of n, a(n) for n = 1..10000</a>

MATHEMATICA

s = Nest[Flatten[# /. {0 -> {1, 0}, 1 -> {2, 0}, 2 -> 1}] &, {0}, 12] (* A287121 *)

Flatten[Position[s, 0]] (* A287122 *)

Flatten[Position[s, 1]] (* A287123 *)

Flatten[Position[s, 2]] (* A287124 *)

CROSSREFS
KEYWORD

allocated

nonn,easy

AUTHOR

Clark Kimberling, May 22 2017

STATUS

approved

editing

#1 by Clark Kimberling at Sat May 20 08:50:46 EDT 2017
NAME

allocated for Clark Kimberling

KEYWORD

allocated

STATUS

approved