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 A203765 #7 Jan 14 2013 07:51:37 %S A203765 1,3,6,49,147,2028,8112,159201,796005,20342448,122054688,3850078401, %T A203765 26950548807,1012487793408,8099902347264,353293863908769, %U A203765 3179644775178921,157973407966483200,1579734079664832000,88087149666575064369 %N A203765 Square root of A203764(n). %t A203765 f[j_] := Floor[(j + 1)/2]; z = 16; %t A203765 u := Product[f[j]^2 - f[j] f[k] + f[k]^2, {j, 1, k - 1}] %t A203765 v[n_] := Product[u, {k, 2, n}] %t A203765 Table[v[n], {n, 1, z}] (* A203763 *) %t A203765 Table[v[n + 1]/v[n], {n, 1, z}] (* A203764 *) %t A203765 Table[Sqrt[v[n + 1]/v[n]], {n, 1, 20}] (* A203765 *) %Y A203765 Cf. A093883. %K A203765 nonn %O A203765 1,2 %A A203765 _Clark Kimberling_, Jan 05 2012