[go: up one dir, main page]
More Web Proxy on the site http://driver.im/
login
Revision History for A151930 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
First differences of A001316.
(history; published version)
#12 by Bruno Berselli at Tue Feb 28 07:45:40 EST 2017
STATUS

proposed

approved

#11 by Ilya Gutkovskiy at Tue Feb 28 07:11:45 EST 2017
STATUS

editing

proposed

#10 by Ilya Gutkovskiy at Tue Feb 28 07:06:30 EST 2017
FORMULA

G.f.: -1/x + ((1 - x)/x)*Product_{k>=0} (1 + 2*x^(2^k)). - Ilya Gutkovskiy, Feb 28 2017

CROSSREFS
STATUS

approved

editing

#9 by Jon E. Schoenfield at Mon Jul 13 21:09:20 EDT 2015
STATUS

editing

approved

#8 by Jon E. Schoenfield at Mon Jul 13 21:09:18 EDT 2015
MAPLE

nmax := 94: A001316 := n -> if n<=-1 then 0 else 2^add(i, i=convert(n, base, 2)) fi: for p from 0 to ceil(log[2](nmax))+1 do for n from 0 to nmax/(p+2)+1 do a((2*n+1)*2^p-1) := (2-2^p) * A001316(n) od: od: seq(a(n), n=0..nmax); # [__Johannes W. Meijer_, Jan 25 2013]

STATUS

approved

editing

#7 by T. D. Noe at Sun Jan 27 15:50:27 EST 2013
STATUS

proposed

approved

#6 by Johannes W. Meijer at Fri Jan 25 18:33:17 EST 2013
STATUS

editing

proposed

#5 by Johannes W. Meijer at Fri Jan 25 18:33:11 EST 2013
FORMULA

a((2*n+1)*2^p-1) = (2-2^p) * A001316(n), p >= 0 and n >=0. - Johannes W. Meijer, Jan 25 2013

MAPLE

nmax := 94: A001316 := n -> if n<=-1 then 0 else 2^add(i, i=convert(n, base, 2)) fi: for p from 0 to ceil(log[2](nmax))+1 do for n from 0 to nmax/(p+2)+1 do a((2*n+1)*2^p-1) := (2-2^p) * A001316(n) od: od: seq(a(n), n=0..nmax); # [Johannes W. Meijer, Jan 25 2013]

CROSSREFS

Cf. A220466.

STATUS

approved

editing

#4 by Russ Cox at Fri Mar 30 16:51:07 EDT 2012
AUTHOR

_N. J. A. Sloane (njas(AT)research.att.com), _, Aug 10 2009

Discussion
Fri Mar 30
16:51
OEIS Server: https://oeis.org/edit/global/110
#3 by Russ Cox at Sun Jul 10 18:19:31 EDT 2011
LINKS

<a href="/Sindx_index/Ce.html#cell">Index entries for sequences related to cellular automata</a>

Discussion
Sun Jul 10
18:19
OEIS Server: https://oeis.org/edit/global/27