Svoboda | Graniru | BBC Russia | Golosameriki | Facebook
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!)

Revision History for A357370

(Underlined text is an addition; strikethrough text is a deletion.)

Showing entries 1-10 | older changes
A357370 Positions of 0's in A355917.
(history; published version)
#16 by Joerg Arndt at Thu Oct 06 04:30:29 EDT 2022
STATUS

reviewed

approved

#15 by Michel Marcus at Thu Oct 06 02:33:39 EDT 2022
STATUS

proposed

reviewed

#14 by Michael S. Branicky at Wed Oct 05 16:43:51 EDT 2022
STATUS

editing

proposed

Discussion
Wed Oct 05 16:44
Michael S. Branicky: just a program.  confirms entire b-file.
#13 by Michael S. Branicky at Wed Oct 05 16:43:48 EDT 2022
PROG

(Python)

from itertools import count, islice

from collections import Counter

def agen():

yield 1

num, alst, inventory = 0, [0, 0], Counter([0, 0])

for n in count(2):

c = [inventory[num], num]

num = 0 if c[0] == 0 else num + 1

if c[0] == 0: yield n

inventory.update(c)

print(list(islice(agen(), 51))) # Michael S. Branicky, Oct 05 2022

STATUS

approved

editing

#12 by Michael De Vlieger at Tue Sep 27 12:43:46 EDT 2022
STATUS

reviewed

approved

#11 by Michel Marcus at Tue Sep 27 12:43:05 EDT 2022
STATUS

proposed

reviewed

#10 by Michael De Vlieger at Mon Sep 26 21:17:34 EDT 2022
STATUS

editing

proposed

#9 by Michael De Vlieger at Mon Sep 26 21:16:39 EDT 2022
LINKS

Michael De Vlieger, <a href="/A357370/b357370.txt">Table of n, a(n) for n = 1..10000</a>

MATHEMATICA

nn = 51; c[_] = 0; i = 1; Reap[Do[k = 0; While[c[k] > 0, Set[{a[i], a[i + 1]}, {m, c[k], k}]; ]]; c[a[i]]++; m]++; c[a[i + 1]]++; k]++; i += 2; k++]; Set[{a[i], a[i + 1]}, {m, c[k], k}]; ]]; c[a[i]]++; m]++; c[a[i + 1]]++; k]++; Sow[(i + 1)/2]; i += 2, {n, nn}]][[-}] ][[-1, -1]]

STATUS

approved

editing

Discussion
Mon Sep 26 21:17
Michael De Vlieger: b-file, program uses less memory.
#8 by N. J. A. Sloane at Mon Sep 26 20:13:50 EDT 2022
STATUS

editing

approved

#7 by N. J. A. Sloane at Mon Sep 26 20:13:17 EDT 2022
NAME

Positions of 0's in A355917.

STATUS

proposed

editing

Discussion
Mon Sep 26 20:13
N. J. A. Sloane: I think 0's rather than 0 (better grammar)

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 September 11 17:54 EDT 2024. Contains 375839 sequences. (Running on oeis4.)