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 A274288 #4 Jun 18 2016 00:40:42
%S A274288 9,15,24,39,63,102,135,165,216,267,351,360,432,567,585,699,918,936,
%T A274288 945,1131,1485,1512,1530,1830,2403,2448,2457,2475,2961,3240,3888,3960,
%U A274288 3978,4005,4791,5265,6291,6408,6426,6435,6480,7752,8424,8505,10179,10368,10395
%N A274288 Numbers that are a product of distinct numbers in row 4 of the Wythoff array, A035513.
%C A274288 See the Comment on distinct-product sequences in A160009.
%H A274288 Clark Kimberling, <a href="/A274288/b274288.txt">Table of n, a(n) for n = 1..1000</a>
%e A274288 135 = 9*15, 3240 = 9*15*24.
%t A274288 f[1] = 9; f[2] = 15; z = 33; f[n_] := f[n - 1] + f[n - 2]; f = Table[f[n], {n, 1, z}]; f
%t A274288 s = {1}; Do[s = Union[s, Select[s*f[[i]], # <= f[[z]] &]], {i, z}]; s1 = Rest[s]
%Y A274288 Cf. A160009, A274191.
%K A274288 nonn,easy
%O A274288 1,1
%A A274288 _Clark Kimberling_, Jun 17 2016