Cpp Copy Array To New Variable In R