devtools::install_github("ropenscilabs/nneo")

library("nneo")

nneo_products()
#> # A tibble: 183 × 13
#>    productStatus
#> *          <chr>
#> 1         FUTURE
#> 2         ACTIVE
#> 3         FUTURE
#> 4         FUTURE
#> 5         ACTIVE
#> 6         FUTURE
#> 7         ACTIVE
#> 8         FUTURE
#> 9         FUTURE
#> 10        FUTURE
#> # ... with 173 more rows, and 12 more variables: productDescription <chr>,
#> #   productCode <chr>, productCategory <chr>, themes <list>,
#> #   productScienceTeam <chr>, productName <chr>,
#> #   productCodePresentation <chr>, specs <list>,
#> #   productScienceTeamAbbr <chr>, productCodeLong <chr>,
#> #   productHasExpanded <lgl>, siteCodes <list>

nneo_sites()
#> # A tibble: 47 × 11
#>                               siteDescription siteLongitude    siteType
#> *                                       <chr>         <dbl>       <chr>
#> 1                                Jornada LTER    -106.84254 RELOCATABLE
#> 2               Klemme Range Research Station     -99.05878 RELOCATABLE
#> 3                  Disney Wilderness Preserve     -81.43619 RELOCATABLE
#> 4                                 Posey Creek     -78.14678        CORE
#> 5           Ordway-Swisher Biological Station     -81.99343        CORE
#> 6       Niwot Ridge Mountain Research Station    -105.58237        CORE
#> 7                                       Healy    -149.21335 RELOCATABLE
#> 8            Jones Ecological Research Center     -84.46862 RELOCATABLE
#> 9  Smithsonian Conservation Biology Institute     -78.13949        CORE
#> 10       Rocky Mountain National Park CASTNET    -105.54596 RELOCATABLE
#> # ... with 37 more rows, and 8 more variables: stateName <chr>,
#> #   stateCode <chr>, siteLatitude <dbl>, domainName <chr>,
#> #   domainCode <chr>, siteCode <chr>, dataProducts <list>, siteName <chr>

res <- nneo_location("HARV")
names(res)
#>  [1] "locationChildren"         "locationElevation"
#>  [3] "locationDescription"      "locationType"
#>  [5] "locationProperties"       "locationDecimalLatitude"
#>  [7] "locationName"             "domainCode"
#>  [9] "siteCode"                 "locationDecimalLongitude"
#> [11] "locationParent"