mean function code snippets in r

find the average of all elements in an array in r