This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A234803 #10 Jan 28 2015 12:35:30 %S A234803 111,150,169,224,231,329,357,373,415,478,493,540,547,564,575,630,637, %T A234803 650,677,684,711,728,750,758,775,782,790,792,814,826,844,873,899,912, %U A234803 931,934,939,954,963,973,976,986,1008,1025,1047,1067,1076,1125,1138,1185,1193,1203,1208,1219,1225,1227,1243,1267,1283,1290,1311,1318,1325,1329 %N A234803 Positions of 2's in A234323. %t A234803 f[n_] := f[n] = Floor[ Im[ N[ ZetaZero[ n]] ]]; t = Array[f, 1000]; f@# & /@ Select[ Range@ 998, t[[#]] == t[[# + 1]] && t[[#]] != t[[# + 2]] &] %Y A234803 Cf. A234323, A234800, A234802, A234804, A234805, A234806, A234807. %K A234803 nonn,easy %O A234803 1,1 %A A234803 _Simon Plouffe_ and _Robert G. Wilson v_, Dec 30 2013