MRB constant proofs wanted
$begingroup$
This article has been edited for a bounty.
$C$ MRB, the MRB constant, is defined at http://mathworld.wolfram.com/MRBConstant.html .
There is an excellent 56 page paper whose author has passed away. You can find it in Google Scholar "MRB constant," Better yet, use the following link http://web.archive.org/web/20130430193005/http://www.perfscipress.com/papers/UniversalTOC25.pdf. You find a cached copy there.
Just before the author, Richerd Crandall, died I wrote him about a possible small error. What I'm worried about is formula 44 on page 29 and below. When I naively worked formula 44 it needed a negative sign in front of it. Crandall did write me back admitting to a typo, but he died before he had a chance to correct it.
Is there anyone out there competent enough to check, correct and prove the corrected
formulas for me? Thank you. I will use the proofs often and try to get the formulas published more.
Here is how I worked formula 44 and got -B:
(*define the Dirichlet eta function*)
eta[s_] := (1 - 2^(1 - s)) Zeta[s];
(*define the higher derivatives of the eta(0)*)
a[i_] := Derivative[i][eta][0];
(*Define c:*)
c[j_] := Sum[Binomial[j, d](-1)^dd^(j - d), {d, 1, j}]
(*formula (44)*)
N[Sum[c[m]/m!*a[m], {m, 1, 40}], 100]
sequences-and-series recreational-mathematics constants
$endgroup$
|
show 1 more comment
$begingroup$
This article has been edited for a bounty.
$C$ MRB, the MRB constant, is defined at http://mathworld.wolfram.com/MRBConstant.html .
There is an excellent 56 page paper whose author has passed away. You can find it in Google Scholar "MRB constant," Better yet, use the following link http://web.archive.org/web/20130430193005/http://www.perfscipress.com/papers/UniversalTOC25.pdf. You find a cached copy there.
Just before the author, Richerd Crandall, died I wrote him about a possible small error. What I'm worried about is formula 44 on page 29 and below. When I naively worked formula 44 it needed a negative sign in front of it. Crandall did write me back admitting to a typo, but he died before he had a chance to correct it.
Is there anyone out there competent enough to check, correct and prove the corrected
formulas for me? Thank you. I will use the proofs often and try to get the formulas published more.
Here is how I worked formula 44 and got -B:
(*define the Dirichlet eta function*)
eta[s_] := (1 - 2^(1 - s)) Zeta[s];
(*define the higher derivatives of the eta(0)*)
a[i_] := Derivative[i][eta][0];
(*Define c:*)
c[j_] := Sum[Binomial[j, d](-1)^dd^(j - d), {d, 1, j}]
(*formula (44)*)
N[Sum[c[m]/m!*a[m], {m, 1, 40}], 100]
sequences-and-series recreational-mathematics constants
$endgroup$
$begingroup$
Would it be possible for you to type in the formula from the paper, and indicate the suspected typo? I don't care to download a 56(-page?) paper just to check one formula.
$endgroup$
– Gerry Myerson
Nov 2 '13 at 23:36
$begingroup$
@Gerry Myerson , I added the formula
$endgroup$
– Marvin Ray Burns
Nov 3 '13 at 14:23
$begingroup$
Thanks. Not enough info there to tell --- in particular, you'd have to know what $eta$ stands for. Sorry --- I hope someone else will download the paper, and give it a try.
$endgroup$
– Gerry Myerson
Nov 3 '13 at 22:10
$begingroup$
That doesn't tell me what $eta$ stands for.
$endgroup$
– Gerry Myerson
Nov 4 '13 at 2:39
3
$begingroup$
The context indicates it is the Dirichlet eta function.
$endgroup$
– anon
Nov 5 '13 at 16:03
|
show 1 more comment
$begingroup$
This article has been edited for a bounty.
$C$ MRB, the MRB constant, is defined at http://mathworld.wolfram.com/MRBConstant.html .
There is an excellent 56 page paper whose author has passed away. You can find it in Google Scholar "MRB constant," Better yet, use the following link http://web.archive.org/web/20130430193005/http://www.perfscipress.com/papers/UniversalTOC25.pdf. You find a cached copy there.
Just before the author, Richerd Crandall, died I wrote him about a possible small error. What I'm worried about is formula 44 on page 29 and below. When I naively worked formula 44 it needed a negative sign in front of it. Crandall did write me back admitting to a typo, but he died before he had a chance to correct it.
Is there anyone out there competent enough to check, correct and prove the corrected
formulas for me? Thank you. I will use the proofs often and try to get the formulas published more.
Here is how I worked formula 44 and got -B:
(*define the Dirichlet eta function*)
eta[s_] := (1 - 2^(1 - s)) Zeta[s];
(*define the higher derivatives of the eta(0)*)
a[i_] := Derivative[i][eta][0];
(*Define c:*)
c[j_] := Sum[Binomial[j, d](-1)^dd^(j - d), {d, 1, j}]
(*formula (44)*)
N[Sum[c[m]/m!*a[m], {m, 1, 40}], 100]
sequences-and-series recreational-mathematics constants
$endgroup$
This article has been edited for a bounty.
$C$ MRB, the MRB constant, is defined at http://mathworld.wolfram.com/MRBConstant.html .
There is an excellent 56 page paper whose author has passed away. You can find it in Google Scholar "MRB constant," Better yet, use the following link http://web.archive.org/web/20130430193005/http://www.perfscipress.com/papers/UniversalTOC25.pdf. You find a cached copy there.
Just before the author, Richerd Crandall, died I wrote him about a possible small error. What I'm worried about is formula 44 on page 29 and below. When I naively worked formula 44 it needed a negative sign in front of it. Crandall did write me back admitting to a typo, but he died before he had a chance to correct it.
Is there anyone out there competent enough to check, correct and prove the corrected
formulas for me? Thank you. I will use the proofs often and try to get the formulas published more.
Here is how I worked formula 44 and got -B:
(*define the Dirichlet eta function*)
eta[s_] := (1 - 2^(1 - s)) Zeta[s];
(*define the higher derivatives of the eta(0)*)
a[i_] := Derivative[i][eta][0];
(*Define c:*)
c[j_] := Sum[Binomial[j, d](-1)^dd^(j - d), {d, 1, j}]
(*formula (44)*)
N[Sum[c[m]/m!*a[m], {m, 1, 40}], 100]
sequences-and-series recreational-mathematics constants
sequences-and-series recreational-mathematics constants
edited Dec 24 '18 at 7:19
community wiki
33 revs, 4 users 99%
Marvin Ray Burns
$begingroup$
Would it be possible for you to type in the formula from the paper, and indicate the suspected typo? I don't care to download a 56(-page?) paper just to check one formula.
$endgroup$
– Gerry Myerson
Nov 2 '13 at 23:36
$begingroup$
@Gerry Myerson , I added the formula
$endgroup$
– Marvin Ray Burns
Nov 3 '13 at 14:23
$begingroup$
Thanks. Not enough info there to tell --- in particular, you'd have to know what $eta$ stands for. Sorry --- I hope someone else will download the paper, and give it a try.
$endgroup$
– Gerry Myerson
Nov 3 '13 at 22:10
$begingroup$
That doesn't tell me what $eta$ stands for.
$endgroup$
– Gerry Myerson
Nov 4 '13 at 2:39
3
$begingroup$
The context indicates it is the Dirichlet eta function.
$endgroup$
– anon
Nov 5 '13 at 16:03
|
show 1 more comment
$begingroup$
Would it be possible for you to type in the formula from the paper, and indicate the suspected typo? I don't care to download a 56(-page?) paper just to check one formula.
$endgroup$
– Gerry Myerson
Nov 2 '13 at 23:36
$begingroup$
@Gerry Myerson , I added the formula
$endgroup$
– Marvin Ray Burns
Nov 3 '13 at 14:23
$begingroup$
Thanks. Not enough info there to tell --- in particular, you'd have to know what $eta$ stands for. Sorry --- I hope someone else will download the paper, and give it a try.
$endgroup$
– Gerry Myerson
Nov 3 '13 at 22:10
$begingroup$
That doesn't tell me what $eta$ stands for.
$endgroup$
– Gerry Myerson
Nov 4 '13 at 2:39
3
$begingroup$
The context indicates it is the Dirichlet eta function.
$endgroup$
– anon
Nov 5 '13 at 16:03
$begingroup$
Would it be possible for you to type in the formula from the paper, and indicate the suspected typo? I don't care to download a 56(-page?) paper just to check one formula.
$endgroup$
– Gerry Myerson
Nov 2 '13 at 23:36
$begingroup$
Would it be possible for you to type in the formula from the paper, and indicate the suspected typo? I don't care to download a 56(-page?) paper just to check one formula.
$endgroup$
– Gerry Myerson
Nov 2 '13 at 23:36
$begingroup$
@Gerry Myerson , I added the formula
$endgroup$
– Marvin Ray Burns
Nov 3 '13 at 14:23
$begingroup$
@Gerry Myerson , I added the formula
$endgroup$
– Marvin Ray Burns
Nov 3 '13 at 14:23
$begingroup$
Thanks. Not enough info there to tell --- in particular, you'd have to know what $eta$ stands for. Sorry --- I hope someone else will download the paper, and give it a try.
$endgroup$
– Gerry Myerson
Nov 3 '13 at 22:10
$begingroup$
Thanks. Not enough info there to tell --- in particular, you'd have to know what $eta$ stands for. Sorry --- I hope someone else will download the paper, and give it a try.
$endgroup$
– Gerry Myerson
Nov 3 '13 at 22:10
$begingroup$
That doesn't tell me what $eta$ stands for.
$endgroup$
– Gerry Myerson
Nov 4 '13 at 2:39
$begingroup$
That doesn't tell me what $eta$ stands for.
$endgroup$
– Gerry Myerson
Nov 4 '13 at 2:39
3
3
$begingroup$
The context indicates it is the Dirichlet eta function.
$endgroup$
– anon
Nov 5 '13 at 16:03
$begingroup$
The context indicates it is the Dirichlet eta function.
$endgroup$
– anon
Nov 5 '13 at 16:03
|
show 1 more comment
1 Answer
1
active
oldest
votes
$begingroup$
The first equality can be reproduced by formally stating the double sum: write down the expanded exponantial series for each term in one row, sum then column-wise to get the derivatives of the $eta()$ and sum then the $eta()$-expressions. Here the $eta(s)$ is the alternating $zeta(s)$ and $eta^{(m)}(s)$ the $m$'th derivative.
$$ begin{array} {rclll}
-exp( {log(1) over 1})+1 & = & -{log(1) over 1}
&-{log(1)^2 over 1^2 2!}
&-{log(1)^3 over 1^3 3!} & - cdots \
+exp( {log(2) over 2})-1 & = &+{log(2) over 2}
&+{log(2)^2 over 2^2 2!}
&+{log(2)^3 over 2^3 3!} & + cdots \
-exp( {log(3) over 3})+1 & = &-{log(3) over 3}
&-{log(3)^2 over 3^2 2!}
&-{log(3)^3 over 3^3 3!} & - cdots \
vdots qquad & vdots & quadvdots & quadvdots& quadvdots
& ddots \
hline \
B qquad & = & {eta^{(1)}(1) over 1!}
&- {eta^{(2)}(2) over 2!}
&+ {eta^{(3)}(3) over 3!} & - cdots
end{array}$$
I've not yet the expansion into the formula with the derivatives of $eta()$ at zero; perhaps I can supply that tomorrow.
Numerical check
In Pari/GP I get for the original sum
$$ B = sum_{k=1}^infty (-1)^k( exp( log(k)/k)-1)$$
B=sumalt(k=1,(-1)^k * (exp( log(k)/k) -1)
well converging the value
B=0.187859642462067120248517934054273230055903094900138786172005...
as well for
B = -sum(k=1,6,(-1)^k*aetad(k,k)/k!)
(but to fewer digits).
My user-defined function aetad(s,d)
gives the d'th derivative of $eta()$ at $s$ and I implemented that aeta()
using the $eta()$ / $zeta()$ conversion formula
aeta(s) = if(s==1,return(log(2));return( (1-2/2^s)*zeta(s) )
{aetad(s=1,d=0)=local(h1=1e-12,z);
z= sum(k=0,d, (-1)^k*binomial(d,k)*aeta(s +(d/2-k)*h1));
return( z/h1^d); }
I have also another implementation of the $eta()$ and its derivatives which allows to access higher derivatives (in the above version the 10'th or even 20'th derivative were impractical). This version is also independent of the software-included zeta-function but uses Pari/GP's
sumalt()
procedure which allows to evaluate alternating (moderately) divergent series. My approach computes the taylor-expansion for the $eta()$ function by default centered around zero but can easily be generalized to any center:fmt(200,12) \ user defined; set internal precision to 200 digits, display to 12 digits
default(seriesexpansion,24) \ set expansion-limit for power series
m_coeffs = vectorv(24); \ vector for 24 aeta-taylor-series
{for(m=0,23,
tay_aeta = sumalt(k=0,(-1)^k/(1+k)^(x+m)); \ taylorseries for aeta around m
m_coeffs[1+m]= polcoeffs(tay_aeta,24); \ store leading 24 taylorcoefficients
);
m_coeffs = Mat(m_coeffs);} \ make a matrix from the list of taylor series
After that, the desired coefficients (the derivatives of the $eta(m)$ ) nicely divided by the factorials, occur on the diagonal of the coefficients-matrix, and we only need sum them with alternating sign:
B = sum (k=1,23, -(-1)^k*m_coeffs[1+k,1+k])
\ 0.1878596424620671202485179340542732... the leading correct digits
$endgroup$
$begingroup$
Thank you! The double sum proof at top is surprisingly easy when you make an array like that!
$endgroup$
– Marvin Ray Burns
Dec 24 '15 at 13:13
$begingroup$
what can you say about the expansion into the MRB constant formula with the derivatives of η() at zero, mentioned in formula 44 in the Crandall paper, lnk .
$endgroup$
– Marvin Ray Burns
Nov 14 '18 at 15:02
$begingroup$
@MarvinRayBurns : the link does not work...
$endgroup$
– Gottfried Helms
Nov 14 '18 at 17:23
$begingroup$
It is the same paper mentioned in the OP. http://citeseerx.ist.psu.edu/viewdoc/download?doi=10.1.1.695.5959&rep=rep1&type=pdf or http://web.archive.org/web/20130430193005/http://www.perfscipress.com/papers/UniversalTOC25.pdf.
$endgroup$
– Marvin Ray Burns
Nov 15 '18 at 13:47
$begingroup$
@MarvinRayBurns - ahh, thank you. It'll take a time to chew on this, I've currently something else in my understanding-complicated-thing module... :-)
$endgroup$
– Gottfried Helms
Nov 15 '18 at 13:58
add a comment |
Your Answer
StackExchange.ifUsing("editor", function () {
return StackExchange.using("mathjaxEditing", function () {
StackExchange.MarkdownEditor.creationCallbacks.add(function (editor, postfix) {
StackExchange.mathjaxEditing.prepareWmdForMathJax(editor, postfix, [["$", "$"], ["\\(","\\)"]]);
});
});
}, "mathjax-editing");
StackExchange.ready(function() {
var channelOptions = {
tags: "".split(" "),
id: "69"
};
initTagRenderer("".split(" "), "".split(" "), channelOptions);
StackExchange.using("externalEditor", function() {
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled) {
StackExchange.using("snippets", function() {
createEditor();
});
}
else {
createEditor();
}
});
function createEditor() {
StackExchange.prepareEditor({
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: true,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: 10,
bindNavPrevention: true,
postfix: "",
imageUploader: {
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
},
noCode: true, onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
});
}
});
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function () {
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmath.stackexchange.com%2fquestions%2f549503%2fmrb-constant-proofs-wanted%23new-answer', 'question_page');
}
);
Post as a guest
Required, but never shown
1 Answer
1
active
oldest
votes
1 Answer
1
active
oldest
votes
active
oldest
votes
active
oldest
votes
$begingroup$
The first equality can be reproduced by formally stating the double sum: write down the expanded exponantial series for each term in one row, sum then column-wise to get the derivatives of the $eta()$ and sum then the $eta()$-expressions. Here the $eta(s)$ is the alternating $zeta(s)$ and $eta^{(m)}(s)$ the $m$'th derivative.
$$ begin{array} {rclll}
-exp( {log(1) over 1})+1 & = & -{log(1) over 1}
&-{log(1)^2 over 1^2 2!}
&-{log(1)^3 over 1^3 3!} & - cdots \
+exp( {log(2) over 2})-1 & = &+{log(2) over 2}
&+{log(2)^2 over 2^2 2!}
&+{log(2)^3 over 2^3 3!} & + cdots \
-exp( {log(3) over 3})+1 & = &-{log(3) over 3}
&-{log(3)^2 over 3^2 2!}
&-{log(3)^3 over 3^3 3!} & - cdots \
vdots qquad & vdots & quadvdots & quadvdots& quadvdots
& ddots \
hline \
B qquad & = & {eta^{(1)}(1) over 1!}
&- {eta^{(2)}(2) over 2!}
&+ {eta^{(3)}(3) over 3!} & - cdots
end{array}$$
I've not yet the expansion into the formula with the derivatives of $eta()$ at zero; perhaps I can supply that tomorrow.
Numerical check
In Pari/GP I get for the original sum
$$ B = sum_{k=1}^infty (-1)^k( exp( log(k)/k)-1)$$
B=sumalt(k=1,(-1)^k * (exp( log(k)/k) -1)
well converging the value
B=0.187859642462067120248517934054273230055903094900138786172005...
as well for
B = -sum(k=1,6,(-1)^k*aetad(k,k)/k!)
(but to fewer digits).
My user-defined function aetad(s,d)
gives the d'th derivative of $eta()$ at $s$ and I implemented that aeta()
using the $eta()$ / $zeta()$ conversion formula
aeta(s) = if(s==1,return(log(2));return( (1-2/2^s)*zeta(s) )
{aetad(s=1,d=0)=local(h1=1e-12,z);
z= sum(k=0,d, (-1)^k*binomial(d,k)*aeta(s +(d/2-k)*h1));
return( z/h1^d); }
I have also another implementation of the $eta()$ and its derivatives which allows to access higher derivatives (in the above version the 10'th or even 20'th derivative were impractical). This version is also independent of the software-included zeta-function but uses Pari/GP's
sumalt()
procedure which allows to evaluate alternating (moderately) divergent series. My approach computes the taylor-expansion for the $eta()$ function by default centered around zero but can easily be generalized to any center:fmt(200,12) \ user defined; set internal precision to 200 digits, display to 12 digits
default(seriesexpansion,24) \ set expansion-limit for power series
m_coeffs = vectorv(24); \ vector for 24 aeta-taylor-series
{for(m=0,23,
tay_aeta = sumalt(k=0,(-1)^k/(1+k)^(x+m)); \ taylorseries for aeta around m
m_coeffs[1+m]= polcoeffs(tay_aeta,24); \ store leading 24 taylorcoefficients
);
m_coeffs = Mat(m_coeffs);} \ make a matrix from the list of taylor series
After that, the desired coefficients (the derivatives of the $eta(m)$ ) nicely divided by the factorials, occur on the diagonal of the coefficients-matrix, and we only need sum them with alternating sign:
B = sum (k=1,23, -(-1)^k*m_coeffs[1+k,1+k])
\ 0.1878596424620671202485179340542732... the leading correct digits
$endgroup$
$begingroup$
Thank you! The double sum proof at top is surprisingly easy when you make an array like that!
$endgroup$
– Marvin Ray Burns
Dec 24 '15 at 13:13
$begingroup$
what can you say about the expansion into the MRB constant formula with the derivatives of η() at zero, mentioned in formula 44 in the Crandall paper, lnk .
$endgroup$
– Marvin Ray Burns
Nov 14 '18 at 15:02
$begingroup$
@MarvinRayBurns : the link does not work...
$endgroup$
– Gottfried Helms
Nov 14 '18 at 17:23
$begingroup$
It is the same paper mentioned in the OP. http://citeseerx.ist.psu.edu/viewdoc/download?doi=10.1.1.695.5959&rep=rep1&type=pdf or http://web.archive.org/web/20130430193005/http://www.perfscipress.com/papers/UniversalTOC25.pdf.
$endgroup$
– Marvin Ray Burns
Nov 15 '18 at 13:47
$begingroup$
@MarvinRayBurns - ahh, thank you. It'll take a time to chew on this, I've currently something else in my understanding-complicated-thing module... :-)
$endgroup$
– Gottfried Helms
Nov 15 '18 at 13:58
add a comment |
$begingroup$
The first equality can be reproduced by formally stating the double sum: write down the expanded exponantial series for each term in one row, sum then column-wise to get the derivatives of the $eta()$ and sum then the $eta()$-expressions. Here the $eta(s)$ is the alternating $zeta(s)$ and $eta^{(m)}(s)$ the $m$'th derivative.
$$ begin{array} {rclll}
-exp( {log(1) over 1})+1 & = & -{log(1) over 1}
&-{log(1)^2 over 1^2 2!}
&-{log(1)^3 over 1^3 3!} & - cdots \
+exp( {log(2) over 2})-1 & = &+{log(2) over 2}
&+{log(2)^2 over 2^2 2!}
&+{log(2)^3 over 2^3 3!} & + cdots \
-exp( {log(3) over 3})+1 & = &-{log(3) over 3}
&-{log(3)^2 over 3^2 2!}
&-{log(3)^3 over 3^3 3!} & - cdots \
vdots qquad & vdots & quadvdots & quadvdots& quadvdots
& ddots \
hline \
B qquad & = & {eta^{(1)}(1) over 1!}
&- {eta^{(2)}(2) over 2!}
&+ {eta^{(3)}(3) over 3!} & - cdots
end{array}$$
I've not yet the expansion into the formula with the derivatives of $eta()$ at zero; perhaps I can supply that tomorrow.
Numerical check
In Pari/GP I get for the original sum
$$ B = sum_{k=1}^infty (-1)^k( exp( log(k)/k)-1)$$
B=sumalt(k=1,(-1)^k * (exp( log(k)/k) -1)
well converging the value
B=0.187859642462067120248517934054273230055903094900138786172005...
as well for
B = -sum(k=1,6,(-1)^k*aetad(k,k)/k!)
(but to fewer digits).
My user-defined function aetad(s,d)
gives the d'th derivative of $eta()$ at $s$ and I implemented that aeta()
using the $eta()$ / $zeta()$ conversion formula
aeta(s) = if(s==1,return(log(2));return( (1-2/2^s)*zeta(s) )
{aetad(s=1,d=0)=local(h1=1e-12,z);
z= sum(k=0,d, (-1)^k*binomial(d,k)*aeta(s +(d/2-k)*h1));
return( z/h1^d); }
I have also another implementation of the $eta()$ and its derivatives which allows to access higher derivatives (in the above version the 10'th or even 20'th derivative were impractical). This version is also independent of the software-included zeta-function but uses Pari/GP's
sumalt()
procedure which allows to evaluate alternating (moderately) divergent series. My approach computes the taylor-expansion for the $eta()$ function by default centered around zero but can easily be generalized to any center:fmt(200,12) \ user defined; set internal precision to 200 digits, display to 12 digits
default(seriesexpansion,24) \ set expansion-limit for power series
m_coeffs = vectorv(24); \ vector for 24 aeta-taylor-series
{for(m=0,23,
tay_aeta = sumalt(k=0,(-1)^k/(1+k)^(x+m)); \ taylorseries for aeta around m
m_coeffs[1+m]= polcoeffs(tay_aeta,24); \ store leading 24 taylorcoefficients
);
m_coeffs = Mat(m_coeffs);} \ make a matrix from the list of taylor series
After that, the desired coefficients (the derivatives of the $eta(m)$ ) nicely divided by the factorials, occur on the diagonal of the coefficients-matrix, and we only need sum them with alternating sign:
B = sum (k=1,23, -(-1)^k*m_coeffs[1+k,1+k])
\ 0.1878596424620671202485179340542732... the leading correct digits
$endgroup$
$begingroup$
Thank you! The double sum proof at top is surprisingly easy when you make an array like that!
$endgroup$
– Marvin Ray Burns
Dec 24 '15 at 13:13
$begingroup$
what can you say about the expansion into the MRB constant formula with the derivatives of η() at zero, mentioned in formula 44 in the Crandall paper, lnk .
$endgroup$
– Marvin Ray Burns
Nov 14 '18 at 15:02
$begingroup$
@MarvinRayBurns : the link does not work...
$endgroup$
– Gottfried Helms
Nov 14 '18 at 17:23
$begingroup$
It is the same paper mentioned in the OP. http://citeseerx.ist.psu.edu/viewdoc/download?doi=10.1.1.695.5959&rep=rep1&type=pdf or http://web.archive.org/web/20130430193005/http://www.perfscipress.com/papers/UniversalTOC25.pdf.
$endgroup$
– Marvin Ray Burns
Nov 15 '18 at 13:47
$begingroup$
@MarvinRayBurns - ahh, thank you. It'll take a time to chew on this, I've currently something else in my understanding-complicated-thing module... :-)
$endgroup$
– Gottfried Helms
Nov 15 '18 at 13:58
add a comment |
$begingroup$
The first equality can be reproduced by formally stating the double sum: write down the expanded exponantial series for each term in one row, sum then column-wise to get the derivatives of the $eta()$ and sum then the $eta()$-expressions. Here the $eta(s)$ is the alternating $zeta(s)$ and $eta^{(m)}(s)$ the $m$'th derivative.
$$ begin{array} {rclll}
-exp( {log(1) over 1})+1 & = & -{log(1) over 1}
&-{log(1)^2 over 1^2 2!}
&-{log(1)^3 over 1^3 3!} & - cdots \
+exp( {log(2) over 2})-1 & = &+{log(2) over 2}
&+{log(2)^2 over 2^2 2!}
&+{log(2)^3 over 2^3 3!} & + cdots \
-exp( {log(3) over 3})+1 & = &-{log(3) over 3}
&-{log(3)^2 over 3^2 2!}
&-{log(3)^3 over 3^3 3!} & - cdots \
vdots qquad & vdots & quadvdots & quadvdots& quadvdots
& ddots \
hline \
B qquad & = & {eta^{(1)}(1) over 1!}
&- {eta^{(2)}(2) over 2!}
&+ {eta^{(3)}(3) over 3!} & - cdots
end{array}$$
I've not yet the expansion into the formula with the derivatives of $eta()$ at zero; perhaps I can supply that tomorrow.
Numerical check
In Pari/GP I get for the original sum
$$ B = sum_{k=1}^infty (-1)^k( exp( log(k)/k)-1)$$
B=sumalt(k=1,(-1)^k * (exp( log(k)/k) -1)
well converging the value
B=0.187859642462067120248517934054273230055903094900138786172005...
as well for
B = -sum(k=1,6,(-1)^k*aetad(k,k)/k!)
(but to fewer digits).
My user-defined function aetad(s,d)
gives the d'th derivative of $eta()$ at $s$ and I implemented that aeta()
using the $eta()$ / $zeta()$ conversion formula
aeta(s) = if(s==1,return(log(2));return( (1-2/2^s)*zeta(s) )
{aetad(s=1,d=0)=local(h1=1e-12,z);
z= sum(k=0,d, (-1)^k*binomial(d,k)*aeta(s +(d/2-k)*h1));
return( z/h1^d); }
I have also another implementation of the $eta()$ and its derivatives which allows to access higher derivatives (in the above version the 10'th or even 20'th derivative were impractical). This version is also independent of the software-included zeta-function but uses Pari/GP's
sumalt()
procedure which allows to evaluate alternating (moderately) divergent series. My approach computes the taylor-expansion for the $eta()$ function by default centered around zero but can easily be generalized to any center:fmt(200,12) \ user defined; set internal precision to 200 digits, display to 12 digits
default(seriesexpansion,24) \ set expansion-limit for power series
m_coeffs = vectorv(24); \ vector for 24 aeta-taylor-series
{for(m=0,23,
tay_aeta = sumalt(k=0,(-1)^k/(1+k)^(x+m)); \ taylorseries for aeta around m
m_coeffs[1+m]= polcoeffs(tay_aeta,24); \ store leading 24 taylorcoefficients
);
m_coeffs = Mat(m_coeffs);} \ make a matrix from the list of taylor series
After that, the desired coefficients (the derivatives of the $eta(m)$ ) nicely divided by the factorials, occur on the diagonal of the coefficients-matrix, and we only need sum them with alternating sign:
B = sum (k=1,23, -(-1)^k*m_coeffs[1+k,1+k])
\ 0.1878596424620671202485179340542732... the leading correct digits
$endgroup$
The first equality can be reproduced by formally stating the double sum: write down the expanded exponantial series for each term in one row, sum then column-wise to get the derivatives of the $eta()$ and sum then the $eta()$-expressions. Here the $eta(s)$ is the alternating $zeta(s)$ and $eta^{(m)}(s)$ the $m$'th derivative.
$$ begin{array} {rclll}
-exp( {log(1) over 1})+1 & = & -{log(1) over 1}
&-{log(1)^2 over 1^2 2!}
&-{log(1)^3 over 1^3 3!} & - cdots \
+exp( {log(2) over 2})-1 & = &+{log(2) over 2}
&+{log(2)^2 over 2^2 2!}
&+{log(2)^3 over 2^3 3!} & + cdots \
-exp( {log(3) over 3})+1 & = &-{log(3) over 3}
&-{log(3)^2 over 3^2 2!}
&-{log(3)^3 over 3^3 3!} & - cdots \
vdots qquad & vdots & quadvdots & quadvdots& quadvdots
& ddots \
hline \
B qquad & = & {eta^{(1)}(1) over 1!}
&- {eta^{(2)}(2) over 2!}
&+ {eta^{(3)}(3) over 3!} & - cdots
end{array}$$
I've not yet the expansion into the formula with the derivatives of $eta()$ at zero; perhaps I can supply that tomorrow.
Numerical check
In Pari/GP I get for the original sum
$$ B = sum_{k=1}^infty (-1)^k( exp( log(k)/k)-1)$$
B=sumalt(k=1,(-1)^k * (exp( log(k)/k) -1)
well converging the value
B=0.187859642462067120248517934054273230055903094900138786172005...
as well for
B = -sum(k=1,6,(-1)^k*aetad(k,k)/k!)
(but to fewer digits).
My user-defined function aetad(s,d)
gives the d'th derivative of $eta()$ at $s$ and I implemented that aeta()
using the $eta()$ / $zeta()$ conversion formula
aeta(s) = if(s==1,return(log(2));return( (1-2/2^s)*zeta(s) )
{aetad(s=1,d=0)=local(h1=1e-12,z);
z= sum(k=0,d, (-1)^k*binomial(d,k)*aeta(s +(d/2-k)*h1));
return( z/h1^d); }
I have also another implementation of the $eta()$ and its derivatives which allows to access higher derivatives (in the above version the 10'th or even 20'th derivative were impractical). This version is also independent of the software-included zeta-function but uses Pari/GP's
sumalt()
procedure which allows to evaluate alternating (moderately) divergent series. My approach computes the taylor-expansion for the $eta()$ function by default centered around zero but can easily be generalized to any center:fmt(200,12) \ user defined; set internal precision to 200 digits, display to 12 digits
default(seriesexpansion,24) \ set expansion-limit for power series
m_coeffs = vectorv(24); \ vector for 24 aeta-taylor-series
{for(m=0,23,
tay_aeta = sumalt(k=0,(-1)^k/(1+k)^(x+m)); \ taylorseries for aeta around m
m_coeffs[1+m]= polcoeffs(tay_aeta,24); \ store leading 24 taylorcoefficients
);
m_coeffs = Mat(m_coeffs);} \ make a matrix from the list of taylor series
After that, the desired coefficients (the derivatives of the $eta(m)$ ) nicely divided by the factorials, occur on the diagonal of the coefficients-matrix, and we only need sum them with alternating sign:
B = sum (k=1,23, -(-1)^k*m_coeffs[1+k,1+k])
\ 0.1878596424620671202485179340542732... the leading correct digits
edited Dec 24 '15 at 23:29
community wiki
3 revs
Gottfried Helms
$begingroup$
Thank you! The double sum proof at top is surprisingly easy when you make an array like that!
$endgroup$
– Marvin Ray Burns
Dec 24 '15 at 13:13
$begingroup$
what can you say about the expansion into the MRB constant formula with the derivatives of η() at zero, mentioned in formula 44 in the Crandall paper, lnk .
$endgroup$
– Marvin Ray Burns
Nov 14 '18 at 15:02
$begingroup$
@MarvinRayBurns : the link does not work...
$endgroup$
– Gottfried Helms
Nov 14 '18 at 17:23
$begingroup$
It is the same paper mentioned in the OP. http://citeseerx.ist.psu.edu/viewdoc/download?doi=10.1.1.695.5959&rep=rep1&type=pdf or http://web.archive.org/web/20130430193005/http://www.perfscipress.com/papers/UniversalTOC25.pdf.
$endgroup$
– Marvin Ray Burns
Nov 15 '18 at 13:47
$begingroup$
@MarvinRayBurns - ahh, thank you. It'll take a time to chew on this, I've currently something else in my understanding-complicated-thing module... :-)
$endgroup$
– Gottfried Helms
Nov 15 '18 at 13:58
add a comment |
$begingroup$
Thank you! The double sum proof at top is surprisingly easy when you make an array like that!
$endgroup$
– Marvin Ray Burns
Dec 24 '15 at 13:13
$begingroup$
what can you say about the expansion into the MRB constant formula with the derivatives of η() at zero, mentioned in formula 44 in the Crandall paper, lnk .
$endgroup$
– Marvin Ray Burns
Nov 14 '18 at 15:02
$begingroup$
@MarvinRayBurns : the link does not work...
$endgroup$
– Gottfried Helms
Nov 14 '18 at 17:23
$begingroup$
It is the same paper mentioned in the OP. http://citeseerx.ist.psu.edu/viewdoc/download?doi=10.1.1.695.5959&rep=rep1&type=pdf or http://web.archive.org/web/20130430193005/http://www.perfscipress.com/papers/UniversalTOC25.pdf.
$endgroup$
– Marvin Ray Burns
Nov 15 '18 at 13:47
$begingroup$
@MarvinRayBurns - ahh, thank you. It'll take a time to chew on this, I've currently something else in my understanding-complicated-thing module... :-)
$endgroup$
– Gottfried Helms
Nov 15 '18 at 13:58
$begingroup$
Thank you! The double sum proof at top is surprisingly easy when you make an array like that!
$endgroup$
– Marvin Ray Burns
Dec 24 '15 at 13:13
$begingroup$
Thank you! The double sum proof at top is surprisingly easy when you make an array like that!
$endgroup$
– Marvin Ray Burns
Dec 24 '15 at 13:13
$begingroup$
what can you say about the expansion into the MRB constant formula with the derivatives of η() at zero, mentioned in formula 44 in the Crandall paper, lnk .
$endgroup$
– Marvin Ray Burns
Nov 14 '18 at 15:02
$begingroup$
what can you say about the expansion into the MRB constant formula with the derivatives of η() at zero, mentioned in formula 44 in the Crandall paper, lnk .
$endgroup$
– Marvin Ray Burns
Nov 14 '18 at 15:02
$begingroup$
@MarvinRayBurns : the link does not work...
$endgroup$
– Gottfried Helms
Nov 14 '18 at 17:23
$begingroup$
@MarvinRayBurns : the link does not work...
$endgroup$
– Gottfried Helms
Nov 14 '18 at 17:23
$begingroup$
It is the same paper mentioned in the OP. http://citeseerx.ist.psu.edu/viewdoc/download?doi=10.1.1.695.5959&rep=rep1&type=pdf or http://web.archive.org/web/20130430193005/http://www.perfscipress.com/papers/UniversalTOC25.pdf.
$endgroup$
– Marvin Ray Burns
Nov 15 '18 at 13:47
$begingroup$
It is the same paper mentioned in the OP. http://citeseerx.ist.psu.edu/viewdoc/download?doi=10.1.1.695.5959&rep=rep1&type=pdf or http://web.archive.org/web/20130430193005/http://www.perfscipress.com/papers/UniversalTOC25.pdf.
$endgroup$
– Marvin Ray Burns
Nov 15 '18 at 13:47
$begingroup$
@MarvinRayBurns - ahh, thank you. It'll take a time to chew on this, I've currently something else in my understanding-complicated-thing module... :-)
$endgroup$
– Gottfried Helms
Nov 15 '18 at 13:58
$begingroup$
@MarvinRayBurns - ahh, thank you. It'll take a time to chew on this, I've currently something else in my understanding-complicated-thing module... :-)
$endgroup$
– Gottfried Helms
Nov 15 '18 at 13:58
add a comment |
Thanks for contributing an answer to Mathematics Stack Exchange!
- Please be sure to answer the question. Provide details and share your research!
But avoid …
- Asking for help, clarification, or responding to other answers.
- Making statements based on opinion; back them up with references or personal experience.
Use MathJax to format equations. MathJax reference.
To learn more, see our tips on writing great answers.
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function () {
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmath.stackexchange.com%2fquestions%2f549503%2fmrb-constant-proofs-wanted%23new-answer', 'question_page');
}
);
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
$begingroup$
Would it be possible for you to type in the formula from the paper, and indicate the suspected typo? I don't care to download a 56(-page?) paper just to check one formula.
$endgroup$
– Gerry Myerson
Nov 2 '13 at 23:36
$begingroup$
@Gerry Myerson , I added the formula
$endgroup$
– Marvin Ray Burns
Nov 3 '13 at 14:23
$begingroup$
Thanks. Not enough info there to tell --- in particular, you'd have to know what $eta$ stands for. Sorry --- I hope someone else will download the paper, and give it a try.
$endgroup$
– Gerry Myerson
Nov 3 '13 at 22:10
$begingroup$
That doesn't tell me what $eta$ stands for.
$endgroup$
– Gerry Myerson
Nov 4 '13 at 2:39
3
$begingroup$
The context indicates it is the Dirichlet eta function.
$endgroup$
– anon
Nov 5 '13 at 16:03