A234804 Positions of 3's in A234323.

5826, 5978, 6494, 7563, 8106, 8942, 9601, 9856, 9976, 10000, 10679, 10909, 11499, 11577, 11916, 12080, 12384, 12584, 12607, 13204, 13493, 13637, 13775, 13912, 14025, 14208, 14622, 14970, 15387, 16039, 16176, 16210, 16223, 16320, 16336, 16656, 16749, 16891, 17046, 17143, 17234, 17292, 17354, 17405, 17937, 18241, 18248, 19174, 19304, 19368, 19412, 19494, 19975, 20072, 20237, 20727, 20825, 21009, 21099, 21173, 21403, 21450, 21707, 21993

Offset

1,1

Links

Table of n, a(n) for n=1..64.

Mathematica

f[n_] := Floor[ Im[ N[ ZetaZero[ n]] ]]; t = Array[f, 20000]; f@# & /@ Select[ Range[20000 - 3], t[[#]] == t[[# + 2]] && t[[#]] != t[[# + 3]] &]

Crossrefs

Cf. A234323, A234800, A234802, A234803, A234805, A234806, A234807.

Sequence in context: A104284 A237477 A131494 * A261941 A264887 A035903

Adjacent sequences: A234801 A234802 A234803 * A234805 A234806 A234807

Keyword

nonn

Author

Simon Plouffe and Robert G. Wilson v, Dec 30 2013

Status

approved