apply code snippets in r

find the largest element in an array in r