create_data/create_index.R

In dankelley/argoFloats: Analysis of Oceanographic Argo Floats

## Note that this code is not run, because we want the dataset to be *static*.
## In fact, we check that it is unchanged, in the test suite.

## The download was done on 2020 September 10, and yielded 1788 profiles.

if (!FALSE) {
    ## An indexBgc of Argo profile data within 200km
    ## of Marsh Harbour, Abaco Island, Bahamas (26.54124N -77.0636W).
    ## https://github.com/dankelley/argoFloats/wiki/Focus-Island
    library(argoFloats)
    indexAll <- getIndex(age=0)
    index <- subset(indexAll, circle=list(longitude=-77.06, latitude=26.54, radius=200))
    save(index, file="index.rda")
    tools::resaveRdaFiles('index.rda')
}