Please use R sutdio

Problem 5. (1) Write a function to compute the variance and skewness of a numeric vector. Variance is defined as n 1 var(x) = (X; - n 1 where I is the sample mean. Skewness is defined as skew(2) na 21(2; 7)3 var(:)3/2