Skip to contents

[Stable] This function obtains the information about of an eLTER location (e.g. https://deims.org/location/12b38f3f-7e72-425a-80c7-7cad35ce4c7b) provided in DEIMS-SDR catalogue.

Usage

get_location_info(locationid, show_map = FALSE)

Arguments

locationid

A character. It is the DEIMS ID of location make from DEIMS-SDR website. DEIMS ID information here. The DEIMS.iD of activity is the URL for the location page.

show_map

A boolean. If TRUE a Leaflet map with occurrences is shown. Default FALSE.

Value

The output of the function is a tibble with the information about the location.

The function output

Map of "LTER Zöbelboden, Austria, Project area" location

Author

Alessandro Oggioni, phD (2020) oggioni.a@irea.cnr.it

Paolo Tagliolato, phD tagliolato.p@irea.cnr.it

Examples

# Sampling location multipolygon
location <- get_location_info(
  locationid =
    "https://deims.org/location/85dc6019-9654-4ba0-8338-08c4ffe8fe47",
  show_map = TRUE
)
location
#> Simple feature collection with 1 feature and 16 fields
#> Geometry type: MULTIPOLYGON
#> Dimension:     XY
#> Bounding box:  xmin: 14.44264 ymin: 47.83822 xmax: 14.44364 ymax: 47.83871
#> Geodetic CRS:  WGS 84
#> # A tibble: 1 × 17
#>   title               abstract   uri   locationType.label locationType.uri type 
#> * <chr>               <chr>      <chr> <chr>              <chr>            <chr>
#> 1 LTER Zöbelboden IP1 Research … http… Sampling Location  http://vocabs.l… Feat…
#> # ℹ 11 more variables: created <dttm>, changed <dttm>, relatedSite.type <chr>,
#> #   relatedSite.title <chr>, relatedSite.uri <chr>, relatedSite.changed <dttm>,
#> #   elevation.min [m], elevation.max [m], elevation.unit <chr>, images <lgl>,
#> #   boundaries <MULTIPOLYGON [°]>

# Sampling location polygon
location <- get_location_info(
  locationid =
    "https://deims.org/location/12b38f3f-7e72-425a-80c7-7cad35ce4c7b",
  show_map = TRUE
)
location
#> Simple feature collection with 1 feature and 16 fields
#> Geometry type: POLYGON
#> Dimension:     XY
#> Bounding box:  xmin: 14.43543 ymin: 47.8376 xmax: 14.45277 ymax: 47.84695
#> Geodetic CRS:  WGS 84
#> # A tibble: 1 × 17
#>   title                 abstract uri   locationType.label locationType.uri type 
#> * <chr>                 <chr>    <chr> <chr>              <chr>            <chr>
#> 1 LTER Zöbelboden, Aus… Boundin… http… Sampling Location  http://vocabs.l… Feat…
#> # ℹ 11 more variables: created <dttm>, changed <dttm>, relatedSite.type <chr>,
#> #   relatedSite.title <chr>, relatedSite.uri <chr>, relatedSite.changed <dttm>,
#> #   elevation.min [m], elevation.max [m], elevation.unit <chr>, images <lgl>,
#> #   boundaries <POLYGON [°]>

# Equipment location polygon
location <- get_location_info(
  locationid =
    "https://deims.org/locations/04de8301-b481-4ed2-89ff-2f48562e2514",
  show_map = TRUE
)
location
#> Simple feature collection with 1 feature and 16 fields
#> Geometry type: POLYGON
#> Dimension:     XY
#> Bounding box:  xmin: 14.44185 ymin: 47.83986 xmax: 14.44199 ymax: 47.83995
#> Geodetic CRS:  WGS 84
#> # A tibble: 1 × 17
#>   title                 abstract uri   locationType.label locationType.uri type 
#> * <chr>                 <chr>    <chr> <chr>              <chr>            <chr>
#> 1 LTER Zöbelboden Meas… Measuri… http… Equipment Location http://vocabs.l… Feat…
#> # ℹ 11 more variables: created <dttm>, changed <dttm>, relatedSite.type <chr>,
#> #   relatedSite.title <chr>, relatedSite.uri <chr>, relatedSite.changed <dttm>,
#> #   elevation.min [m], elevation.max [m], elevation.unit <chr>, images <lgl>,
#> #   boundaries <POLYGON [°]>

# Sampling location point
location <- get_location_info(
  locationid =
    "https://deims.org/location/ec1a58f7-1aee-4e3f-bec3-4eb1516ee905",
  show_map = TRUE
)
location
#> Simple feature collection with 1 feature and 16 fields
#> Geometry type: POINT
#> Dimension:     XY
#> Bounding box:  xmin: 8.632557 ymin: 45.95221 xmax: 8.632557 ymax: 45.95221
#> Geodetic CRS:  WGS 84
#> # A tibble: 1 × 17
#>   title                 abstract uri   locationType.label locationType.uri type 
#> * <chr>                 <chr>    <chr> <chr>              <chr>            <chr>
#> 1 Ghiffa station (deep… Samplin… http… Sampling Location  http://vocabs.l… Feat…
#> # ℹ 11 more variables: created <dttm>, changed <dttm>, relatedSite.type <chr>,
#> #   relatedSite.title <chr>, relatedSite.uri <chr>, relatedSite.changed <dttm>,
#> #   elevation.min [m], elevation.max [m], elevation.unit <chr>, images <lgl>,
#> #   boundaries <POINT [°]>

# Sampling location point with location type null
location <- get_location_info(
  locationid =
    "https://deims.org/location/c3db70c3-5d2c-4905-801c-7b7a5c4d00d9",
  show_map = TRUE
)
location
#> Simple feature collection with 1 feature and 16 fields
#> Geometry type: POINT
#> Dimension:     XY
#> Bounding box:  xmin: 8.636469 ymin: 45.95401 xmax: 8.636469 ymax: 45.95401
#> Geodetic CRS:  WGS 84
#> # A tibble: 1 × 17
#>   title  abstract                uri   locationType.label locationType.uri type 
#> * <chr>  <chr>                   <chr> <chr>              <lgl>            <chr>
#> 1 Ghiffa sampling site Ghiffa (… http… not declared       NA               Feat…
#> # ℹ 11 more variables: created <dttm>, changed <dttm>, relatedSite.type <chr>,
#> #   relatedSite.title <chr>, relatedSite.uri <chr>, relatedSite.changed <dttm>,
#> #   elevation.min [m], elevation.max [m], elevation.unit <chr>, images <lgl>,
#> #   boundaries <POINT [°]>