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 A171159 #12 Oct 10 2023 05:32:21 %S A171159 6,15,40,60,104,260,273,714,1092,1820,1870,4641,4895,12376,12816, %T A171159 19635,33552,83215,85085,87841,136136,229970,352440,582505,602070, %U A171159 1493064,1514513,1576239,3994320,4126648,6324552,10803704,16776144,26791505 %N A171159 Ordered Fibonomial coefficients (A144712) which are not Fibonacci numbers (A000045). %C A171159 Complement of A144712 with A000045. %C A171159 Not surprisingly, many are Golden rectangle numbers (A001654). %H A171159 Robert G. Wilson v, <a href="/A171159/b171159.txt">Table of n, a(n) for n = 1..54</a> %t A171159 f[n_, k_] := Product[Fibonacci[n - j + 1]/Fibonacci[j], {j, k}]; fibQ[n_] := (Fibonacci@ Round@ Log[ GoldenRatio, n*Sqrt@5] == n); Take[ Select[ Union@ Flatten@ Table[ f[n, i], {n, 0, 19}, {i, 0, Floor[n/2]}], ! fibQ@# &], 34] %Y A171159 Cf. A000045, A010048, A144712, A001654. %K A171159 nonn %O A171159 1,1 %A A171159 _Robert G. Wilson v_, Dec 04 2009