[R] test array
[R] sum of two arrays