See #121 (closed)
Change the $coords elements inside the 's2dv_cube' to be vectors. Now, in some cases they are vectors, in some cases they are arrays.
Example
# Current
> library(CSTools)
> dim(lonlat_prec$coords$lon)
[1] 4
> class(lonlat_prec$coords$lon)
[1] "array"
> length(lonlat_prec$coords$lon)
[1] 4
# Change coords arrays to vectors
> dim(lonlat_prec$coords$lon)
NULL
> class(lonlat_prec$coords$lon)
[1] "numeric"
> length(lonlat_prec$coords$lon)
[1] 4