OFFSET
1,2
COMMENTS
p divides a(p-1) for primes p in A007645.
FORMULA
a(n) = Numerator[Sum[Sum[(2i)!/(i!)^2/(i+1)/((2j)!/(j!)^2/(j+1)),{i,1,n}],{j,1,n}]].
MATHEMATICA
Numerator[Table[Sum[Sum[(2i)!/(i!)^2/(i+1)/((2j)!/(j!)^2/(j+1)), {i, 1, n}], {j, 1, n}], {n, 1, 20}]]
CROSSREFS
KEYWORD
frac,nonn
AUTHOR
Alexander Adamchuk, Jul 14 2006
STATUS
approved