calculus code snippets in r

get the partial derivative of x in r