which.max returns the position of the element with the maximal value in a vector.

n <- c (31, 47, 18, 9, 25, 19, 62, 32)

pos_max <- which.max(n)
print(pos_max)
# [1] 7

n[pos_max]
# [1] 62