data_path <- system.file('extdata', package = 'startR', mustWork = TRUE)
file_to_open <- file.path(data_path, 'obs/monthly_mean/tos/tos_200011.nc')
file_selectors <- c(dat = 'dat1', var = 'tos', sdate = '200011')
first_round_indices <- list(time = 1, latitude = 1:8, longitude = 1:16)
synonims <- list(dat = 'dat', var = 'var', sdate = 'sdate', time = 'time',
latitude = 'latitude', longitude = 'longitude')
sub_array <- NcDataReader(file_to_open, NULL, file_selectors,
first_round_indices, synonims)
Run the code above in your browser using DataLab