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 A274284 #4 Jun 18 2016 00:40:05 %S A274284 2,4,6,8,10,12,16,20,24,26,32,40,42,48,52,60,64,68,80,84,96,104,110, %T A274284 120,128,136,156,160,168,178,192,208,220,240,252,260,272,288,312,320, %U A274284 336,356,384,408,416,420,440,466,480,504,520,544,576,624,640,660,672 %N A274284 Numbers that are a product of distinct numbers in A006355. %C A274284 See the Comment on distinct-product sequences in A160009. %H A274284 Clark Kimberling, <a href="/A274284/b274284.txt">Table of n, a(n) for n = 1..1000</a> %e A274284 8 = 2*4, 480 = 2*4*6*10. %t A274284 f[1] = 2; f[2] = 4; z = 32; f[n_] := f[n - 1] + f[n - 2]; f = Table[f[n], {n, 1, z}]; f %t A274284 s = {2}; Do[s = Union[s, Select[s*f[[i]], # <= f[[z]] &]], {i, z}]; s %Y A274284 Cf. A160009. %K A274284 nonn,easy %O A274284 1,1 %A A274284 _Clark Kimberling_, Jun 17 2016