OFFSET
1,2
MATHEMATICA
f[n_] := Log2[ Denominator[ Sum[ Binomial[2m, m]/4^m, {m, 0, n^2 -1}] -n]]; Array[f, 50]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ralf Steiner, Apr 13 2017
STATUS
approved