Description Usage Arguments Examples
View source: R/spCoordinateTrans.R
<ec><a2><8c><ed><91><9c><ea><b3><84><eb><a5><bc> <eb><b3><80><ed><99><98><ed><95><98><eb><8a><94> <ed><95><a8><ec><88><98><eb><a1><9c><ec><8d><a8>, <eb><94><94><ed><8f><b4><ed><8a><b8><eb><a1><9c><eb><8a><94> UTM-K(GRS-80) <ec><a2><8c><ed><91><9c><ea><b3><84><eb><a5><bc> WGS84 <ec><a2><8c><ed><91><9c><ea><b3><84><eb><a1><9c> <eb><b3><80><ed><99><98><ed><95><a8>
1 2 3 | spCoordinateTrans(long, lat,
from.crs = "+proj=tmerc +lat_0=38 +lon_0=127.5 +k=0.9996 +x_0=1000000 +y_0=2000000 +ellps=GRS80 +units=m +no_defs",
to.crs = "+proj=longlat +ellps=WGS84 +datum=WGS84 +no_defs")
|
long |
input longitude vector |
lat |
input latitude vector |
1 2 | exdata <- data.frame(long = c(1039197, 1041137, 1039216, 1037176), lat = c(1926417, 1927056, 1927526, 1924963)) # UTM-K(GRS-80)
spCoordinateTrans(exdata$long, exdata$lat) # WGS84
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.