OFFSET
1,2
COMMENTS
This constant K and the constant J = A339135 allow the expression of the real and imaginary parts of:
Psi(1/4 + i*sqrt(3)/4) = - J - log(2)/3 - (1/2)*Pi/cosh(Pi*sqrt(3)/2) + i*sqrt(3)*K;
Psi(-1/4 + i*sqrt(3)/4) = 1 - J - log(2)/3 + (1/2)*Pi/cosh(Pi*sqrt(3)/2) + i*(sqrt(3) - sqrt(3)*K + Pi*tanh(Pi*sqrt(3)/2));
Psi(3/4 + i*sqrt(3)/4)= - J - i*sqrt(3)*k - log(2)/3 + (1/2)*Pi/cosh(Pi*sqrt(3)/4) + i*Pi*tanh(Pi*sqrt(3)/2).
Psi(-3/4 + i*sqrt(3)/4) = 1 - J - log(2)/3 - (1/2)*Pi/cosh(Pi*sqrt(3)/2) + i*(sqrt(3)/3 + sqrt(3)*K).
where Psi is the digamma function and i=sqrt(-1).
FORMULA
Equals -i/(2*sqrt(3)) * (Psi(1/4 + i*sqrt(3)/4) - Psi(1/4 - i*sqrt(3)/4)).
Equals Pi*sqrt(3)*tanh(Pi*sqrt(3)/2)/3 - Sum_{m>=0} 1/(3 + 6*m + 4*m^2).
EXAMPLE
1.27972874228189683364727570150763067226260...
MAPLE
K:= Re(sum(1/(1+2*n+4*n^2), n=0..infinity)):
evalf(K, 120); # Alois P. Heinz, Dec 06 2020
MATHEMATICA
RealDigits[N[Re[Sum[1/(1 + 2*n + 4*n^2), {n, 0, Infinity}]], 110]][[1]]
PROG
(PARI) sumpos(n=0, 1/(1+2*n+4*n^2)) \\ Michel Marcus, Nov 28 2020
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Artur Jasinski, Nov 28 2020
STATUS
approved