Replace Kanji in degrees, minutes, and seconds with symbols

Replace Kanji in degrees, minutes, and seconds with symbols

replace_dohunbyo_kanji(x)

Arguments

x	character

Value

character vector

Examples

x <- "\u6771\u7d4c139\u5ea644\u520628\u79d28869"
replace_dohunbyo_kanji(x)
#> [1] "E139°44’28.8869"
y <- "\u5317\u7def35\u5ea639\u520629\u79d21572"
replace_dohunbyo_kanji(y)
#> [1] "N35°39’29.1572"