On windows only, integer numpy arrays convert to R double arrays

[t-kalinowski]

library(reticulate)
x <- array(1:64, c(4, 4, 4)) 
y <- r_to_py(x)
z <- py_to_r(y)

typeof(x)
#> [1] "integer"
y$dtype
#> dtype('int32')
typeof(z)
#> [1] "double"
stopifnot(typeof(x) == typeof(z))
#> Error: typeof(x) == typeof(z) is not TRUE

^{Created on 2023-09-06 with reprex v2.0.2}