OFFSET
1,4
LINKS
James Burling, Another Special Rational Sequence
FORMULA
a(n) = denom(n * 2^(n - 1) / (n - 1)!).
a(n) = denom(g(1, n)) where g(m, n) = m if m = n; 2g(m + 1, n)/m otherwise.
MAPLE
A248592 := proc(n)
n*2^(n-1)/(n-1)! ;
denom(%) ;
end proc:
seq(A248592(n), n=1..30) ; # R. J. Mathar, Oct 10 2014
PROG
(PARI) vector(40, n, denominator(n*2^(n - 1)/(n - 1)!)) \\ Michel Marcus, Oct 09 2014
CROSSREFS
KEYWORD
frac,nonn
AUTHOR
James Burling, Oct 09 2014
EXTENSIONS
More terms from Michel Marcus, Oct 09 2014
STATUS
approved