OFFSET
1,2
LINKS
J. de Gier, Loops, matchings and alternating-sign matrices, arXiv:math.CO/0211285, 2002-2003.
EXAMPLE
1, 4/5, 7/10, 7/11, 13/22, 104/187, 494/935, 988/1955, 190/391, 5320/11339, 20615/45356, 589/1334, 1147/2668, 11470/27347, ...
MAPLE
f:=proc(n) local j;
mul(((3*j+1)/(3*j+2)), j=1..n-1); end;
t1:=[seq(f(n), n=1..50)];
map(numer, t1);
map(denom, t1);
MATHEMATICA
Table[Product[(3*j+1)/(3*j+2), {j, 1, n-1}] // Denominator, {n, 1, 33}] (* Jean-François Alcover, Mar 25 2018 *)
PROG
(PARI) a(n) = denominator(prod(j=1, n-1, (3*j+1)/(3*j+2))); \\ Michel Marcus, Mar 25 2018
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
N. J. A. Sloane, May 04 2016
STATUS
approved