plot log_2[Binomial[2k,k+1]] for k from 1 to 10