powered by
catalan(n)
n<=30< code="">.=30<>
C <- numeric(10) for (i in 1:10) C[i] <- catalan(i) C[5] #=> 42
Run the code above in your browser using DataLab