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 A274374 #11 Oct 30 2017 03:41:38 %S A274374 0,2,3,4,5,6,7,8,10,11,12,13,15,16,18,21,24,26,28,29,33,34,39,40,42, %T A274374 44,47,54,55,63,65,68,72,76,77,87,89,102,104,105,110,116,123,126,141, %U A274374 144,165,168,170,178,188,198,199,203,228,233,267,272,273,275,288 %N A274374 Products of 2 distinct Fibonacci numbers and products of two distinct Lucas numbers (without 2), arranged in increasing order. %C A274374 Are 3 and 21 the only numbers that are a product of two distinct Fibonacci numbers and also a product of two distinct Lucas numbers? %H A274374 G. C. Greubel, <a href="/A274374/b274374.txt">Table of n, a(n) for n = 1..5000</a> %t A274374 z = 400; f[n_] := Fibonacci[n]; %t A274374 s = Join[{0}, Take[Sort[Flatten[Table[f[m] f[n], {n, 2, z}, {m, 2, n - 1}]]], z]] %t A274374 g[n_] := LucasL[n]; t = Take[Sort[Flatten[Table[g[u] g[v], {u, 1, z}, {v, 1, u - 1}]]], z] %t A274374 Union[s, t] %Y A274374 Cf. A049862, A274347, A274375. %K A274374 nonn,easy %O A274374 1,2 %A A274374 _Clark Kimberling_, Jun 19 2016