Я пытаюсь преобразовать свой набор данных в формате градус, минута и секунда (например, 43º 00 '21,6 ") в широту и / или / после в UTM.
Вот набор данных
Я пытался запустить функции degree
и char2dms
, но они не работают.
d2 <- read.table("./original_data.txt",header=TRUE, stringsAsFactors=FALSE,sep="\t")
degree(d2["X"], d2["Y"], data=d2[,c("X","Y")])
Error in withCallingHandlers(expr, warning = function(w) if (inherits(w, : 'list'
object cannot be coerced to type 'double
Кроме того, я попытался запустить char2dms
но тоже не работает.
d2$char2dms <- as.numeric(sp::char2dms(d2$X, chd = "º ", chm = "' ", chs = "\""))
Error in if (any(abs(object@deg) > 360)) return("abs(degree) > 360") else if (any(object@WS & :
missing value where TRUE/FALSE necessary
Warning message: In asMethod(object) : NAs introduced by coercion