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 A190190 #9 Dec 30 2017 03:29:11
%S A190190 1,2,4,5,8,12,13,15,16,18,19,24,25,26,27,29,32,35,36,37,38,40,43,47,
%T A190190 48,50,51,54,57,59,61,62,64,65,70,71,72,73,75,76,82,83,84,86,89,93,94,
%U A190190 95,96,97,100,103,105,106,107,108,111,114,118,119,121,122,125,128,129,130,132,133,135,140,141,142,143,144,146,151
%N A190190 Positions of 1 in A190188; complement of A180189.
%C A190190 See A190188.
%H A190190 G. C. Greubel, <a href="/A190190/b190190.txt">Table of n, a(n) for n = 1..5549</a>
%t A190190 u = E; v = 1/E;
%t A190190 f[n_] := Floor[n*u + n*v] - Floor[n*u] - Floor[n*v]
%t A190190 t = Table[f[n], {n, 1, 120}] (* A190188 *)
%t A190190 Flatten[Position[t, 0]] (* A190189 *)
%t A190190 Flatten[Position[t, 1]] (* A190190 *)
%Y A190190 Cf. A190188, A190189.
%K A190190 nonn
%O A190190 1,2
%A A190190 _Clark Kimberling_, May 05 2011