A131586 Concatenation of first n numbers of the decimal expansion of imaginary part of 4th nontrivial zero of Riemann zeta function.
3, 30, 304, 3042, 30424, 304248, 3042487, 30424876, 304248761, 3042487612, 30424876125, 304248761258, 3042487612585, 30424876125859, 304248761258595, 3042487612585951, 30424876125859513, 304248761258595132
Offset: 0
Programs
-
Mathematica
Module[{nn=30,zzero},zzero=RealDigits[Im[N[ZetaZero[4],nn]]][[1]];Table[ FromDigits[Take[zzero,n]],{n,nn}]] (* Harvey P. Dale, Jul 06 2021 *)