# NOT RUN {
ll <- data.frame(lon = c("-122<U+00B0> 19' 55\"",
"71<U+00B0> 3' 32\" W"),
lat = c("47<U+00B0> 36' 22\"",
"42<U+00B0> 21' 36\" N"),
stringsAsFactors = FALSE)
dms2dd(ll[, 'lon'], ll[, 'lat'])
# }
Run the code above in your browser using DataLab