In R script, This question uses the vectors xVec and yVec created in the previous question and the functions sort, order, mean, sqrt, sum and abs.

set.seed(50) xVec <- sample(0:999, 250, replace=T) yVec <- sample(0:999, 250, replace=T)

(a) Pick out the values in yVec which are > 600. (b) What are the index positions in yVec of the values which are > 600? (c) What are the values in xVec which correspond to the values in yVec which are > 600? (By correspond, we mean at the same index positions.)

(d) How many values in yVec are within 200 of the maximum value of the terms in yVec? (f) How many numbers in xVec are divisible by 2? (Note that the modulo operator is denoted %%.) (e) Sort the numbers in the vector xVec in the order of increasing values in yVec. (f) Pick out the elements in yVec at index positions 1, 4, 7, 10, 13, . . . .