The On-Line Encyclopedia of Integer Sequences (OEIS)

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

A159034

Inverse Euler transform of A155200.
(history; published version)

#14 by Susanna Cuyler at Wed Jan 08 09:44:20 EST 2020

STATUS

reviewed

approved

#13 by Michel Marcus at Wed Jan 08 01:18:49 EST 2020

STATUS

proposed

reviewed

#12 by Andrew Howroyd at Wed Jan 08 01:01:56 EST 2020

STATUS

editing

proposed

#11 by Andrew Howroyd at Wed Jan 08 00:18:29 EST 2020

DATA

2, 7, 170, 16380, 6710886, 11453246035, 80421421917330, 2305843009213685760, 268650182136584261045760, 126765060022822940149666965093, 241677817415439249618874010960062650, 1858395433210885261794643189387357732203180, 57560679870263253393868202642364377389525958615670

LINKS

Andrew Howroyd, <a href="/A159034/b159034.txt">Table of n, a(n) for n = 1..50</a>

PROG

(PARI) a(n)={sumdiv(n, d, 2^(d^2)*moebius(n/d))/n} \\ Andrew Howroyd, Jan 08 2020

EXTENSIONS

Terms a(12) and beyond from Andrew Howroyd, Jan 08 2020

STATUS

approved

editing

#10 by Vaclav Kotesovec at Wed Oct 09 03:08:15 EDT 2019

STATUS

editing

approved

#9 by Vaclav Kotesovec at Wed Oct 09 03:08:11 EDT 2019

FORMULA

a(n) ~ 2^(n^2) / n. - Vaclav Kotesovec, Oct 09 2019

#8 by Vaclav Kotesovec at Wed Oct 09 03:06:08 EDT 2019

MATHEMATICA

Table[Sum[2^(d^2)*MoebiusMu[n/d], {d, Divisors[n]}]/n, {n, 1, 12}] (* Vaclav Kotesovec, Oct 09 2019 *)

STATUS

approved

editing

#7 by Alois P. Heinz at Tue Jan 24 10:50:06 EST 2017

STATUS

editing

approved

#6 by Alois P. Heinz at Tue Jan 24 10:50:02 EST 2017

AUTHOR

_Paul D. Hanna_, Vladeta Jovovic, Apr 02 2009

STATUS

approved

editing

#5 by Alois P. Heinz at Tue Jan 24 10:49:41 EST 2017

STATUS

editing

approved