```{r}
r_arr <- as.vector(py$py_arr)
print(r_arr)
```