The On-Line Encyclopedia of Integer Sequences (OEIS)

The OEIS is supported by the many generous donors to the OEIS Foundation.

Revision History for A130246

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A130246

Partial sums of A130245.
(history; published version)

#17 by Charles R Greathouse IV at Thu Sep 08 08:45:30 EDT 2022

PROG

(MAGMAMagma) [0] cat [(&+[1+Floor(Log((2*k+1)/2)/Log((1+Sqrt(5))/2)): k in [1..n]]): n in [1..100]]; // G. C. Greubel, Sep 09 2018

Discussion

Thu Sep 08

08:45

OEIS Server: https://oeis.org/edit/global/2944

#16 by Bruno Berselli at Fri Sep 21 03:09:42 EDT 2018

STATUS

reviewed

approved

#15 by Michel Marcus at Fri Sep 21 03:01:00 EDT 2018

STATUS

proposed

reviewed

#14 by G. C. Greubel at Fri Sep 21 02:50:01 EDT 2018

STATUS

editing

proposed

#13 by G. C. Greubel at Fri Sep 21 02:39:37 EDT 2018

MATHEMATICA

Join[{0}, Table[Sum[1 + Floor[Log[GoldenRatio, (2*k + 1)/2]], {k, 1, n}], {n, 1, 0, 100}]] (* G. C. Greubel, Sep 09 2018 *)

STATUS

proposed

editing

#12 by Michel Marcus at Wed Sep 12 02:20:48 EDT 2018

STATUS

editing

proposed

Discussion

Wed Sep 12

03:55

Joerg Arndt: Why "Join[{0}, " (and similar in Magma)? Just start the ranges with 0.

#11 by Michel Marcus at Wed Sep 12 02:20:45 EDT 2018

FORMULA

G.f.: g(x) = 1/(1-x)^2*Sum_{k>=0} x^A000032(k).

STATUS

proposed

editing

#10 by Jon E. Schoenfield at Tue Sep 11 23:01:20 EDT 2018

STATUS

editing

proposed

#9 by Jon E. Schoenfield at Tue Sep 11 23:01:17 EDT 2018

FORMULA

a(n) = Sum_{k=1..n} A130245(k).

a(n) = 1 +(n+1)*A130245(n) - A000032(A130245(n)+1) for n=0 or n >= 2.

G.f.: g(x) = 1/(1-x)^2*Sum_{k>=0, } x^A000032(k)}.

STATUS

proposed

editing

#8 by G. C. Greubel at Mon Sep 10 22:05:48 EDT 2018

STATUS

editing

proposed