Let x1, x2, ..., Xn be the n > 2 elements in a vector x. Write an R function named movave with a single argument x that returns a vector of length n - 1 whose elements are the moving averages x1 + x2 x2 + x3 x3 +X4 Xn-1 + x2 2 .2 .2 ..2 Test your function for some sample vectors used as arguments. Let X1, X2, ..., Xn denote the elements of the vector x. Write an R function named L2 with a single vector argument x that calculates the L2 norm V x + x + ... + x2 Test your function with the R commands > L2 (c(3, 4)) > L2(c(1, 1, 1))