The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation. Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A084588 Least positive integers, all distinct, that satisfy sum(n>0,1/a(n)^z)=0, where z is the first nontrivial zero of the Riemann Zeta function: z=(1/2 + i*y) with y=14.13472514173469379045... 7
 1, 2, 3, 4, 5, 6, 11, 13, 16, 20, 25, 30, 36, 44, 54, 65, 78, 93, 110, 130, 153, 178, 205, 234, 266, 300, 337, 376, 418, 462, 509, 559, 611, 666, 723, 783, 845, 910, 978, 1048, 1122, 1198, 1277, 1359, 1444, 1532, 1623, 1717, 1814, 1914, 2017, 2123, 2232, 2344 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS Sequence satisfies: sum(n>0,1/a(n)^z)=0 by requiring that the modulus of the successive partial sums are monotonically decreasing in magnitude to zero for the given z. Sequences A084588 - A084593 are related to zeros of the Riemann zeta function. The least integers that satisfy sum(n>0, 1/a(n)^z ) = 0, where a(1)=1, a(n+1)>a(n) and z is a nontrivial zero of the Riemann zeta function. LINKS Andrew M. Odlyzko, The first 100 (nontrivial) zeros of the Riemann Zeta function. MATHEMATICA Reap[For[z = ZetaZero; S = 0; w = 1; a = 0; n = 1, n <= 100, n++, b = a + 1; While[Abs[S + Exp[-z*Log[b]]] > w, b++]; S = S + Exp[-z*Log[b]]; w = Abs[S]; a = b; Print[b]; Sow[b]]][[2, 1]] (* Jean-François Alcover, Oct 22 2019, from PARI *) PROG (PARI) S=0; w=1; a=0; for(n=1, 100, b=a+1; while(abs(S+exp(-z*log(b)))>w, b++); S=S+exp(-z*log(b)); w=abs(S); a=b; print1(b, ", ")) CROSSREFS Sequence in context: A108379 A082657 A108378 * A309548 A088411 A075073 Adjacent sequences:  A084585 A084586 A084587 * A084589 A084590 A084591 KEYWORD nonn AUTHOR Paul D. Hanna, Jun 03 2003 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified May 26 22:58 EDT 2020. Contains 334634 sequences. (Running on oeis4.)