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 A274286 #5 Jun 18 2016 00:40:20
%S A274286 4,7,11,18,28,29,44,47,72,76,77,116,123,126,188,198,199,203,304,308,
%T A274286 319,322,329,492,504,517,521,522,532,792,796,812,836,843,846,861,1276,
%U A274286 1288,1316,1353,1363,1364,1368,1386,1393,2068,2084,2088,2128,2189,2204
%N A274286 Numbers that are a product of distinct numbers in row 2 of the Wythoff array, A035513.
%C A274286 See the Comment on distinct-product sequences in A160009.
%H A274286 Clark Kimberling, <a href="/A274286/b274286.txt">Table of n, a(n) for n = 1..1000</a>
%e A274286 28 = 4*7, 308 = 4*7*11.
%t A274286 f[1] = 4; f[2] = 7; z = 33; f[n_] := f[n - 1] + f[n - 2]; f = Table[f[n], {n, 1, z}]; f
%t A274286 s = {1}; Do[s = Union[s, Select[s*f[[i]], # <= f[[z]] &]], {i, z}]; s1 = Rest[s]
%Y A274286 Cf. A160009, A274280.
%K A274286 nonn,easy
%O A274286 1,1
%A A274286 _Clark Kimberling_, Jun 17 2016