sharpshootR (version 1.7)

PLSS2LL: PLSS2LL

Description

Fetch latitude and longitude centroid coordinates for coded PLSS information from the BLM PLSS web service.

Usage

PLSS2LL(p, plssid = "plssid")

Arguments

p

data.frame with chunks of PLSS coordinates

plssid

Column name containing PLSS ID (default: "plssid")

Value

A data.frame of PLSS codes and coordinates.

See Also

LL2PLSS, formatPLSS

Examples

# NOT RUN {
if(requireNamespace("curl") &
   curl::has_internet()) {

  # create some data
  d <- data.frame(
    id = 1:3,
    qq = c('SW', 'SW', 'SE'),
    q = c('NE', 'NW', 'SE'),
    s = c(17, 32, 30),
    t = c('T36N', 'T35N', 'T35N'),
    r = c('R29W', 'R28W', 'R28W'),
    type = 'SN',
    m = 'MT20',
    stringsAsFactors = FALSE
  )

  # generate formatted PLSS codes
  d$plssid <- formatPLSS(d)

  # fetch lat/long coordinates
  PLSS2LL(d)
}
# }