<style type='text/css'>.TerraceMsg { font-size: 12px; font-family:Dotum, Arial, Verdana, Sans-Serif;}.Bold { font-weight: bold; }</style><div class='TerraceMsg'><p>I have a dataset contains hourly PM10 concentrations (<span style='line-height: 107%; font-family: "Calibri",sans-serif; font-size: 11pt; mso-fareast-font-family: "Malgun Gothic"; mso-ascii-theme-font: minor-latin; mso-fareast-theme-font: minor-fareast; mso-hansi-theme-font: minor-latin; mso-bidi-font-family: Vrinda; mso-bidi-theme-font: minor-bidi; mso-ansi-language: EN-US; mso-fareast-language: KO; mso-bidi-language: AR-SA;'>?g/m³</span>) for 1 hour of 83 location. <a href="https://drive.google.com/file/d/0ByY3OAw62EShaUVTMWs0VzNJanM/view" target="_self">Please download from here.</a> I have plotted semivariogram with these dataset. In semivariogram (Semivariance Vs Distance), the unit of distance is in meter(m) But I want semivariogram in which the unit of distance would be in kilometer(Km). How can I do this?  </p><p> </p><p>my R code:</p><p>seoul032801 <- read.csv("seoul032801.csv")<br>seoul032801<-na.omit(seoul032801) </p><p> </p><p>coordinates(seoul032801) <- ~LON+LAT<br>proj4string(seoul032801) =  "+proj=longlat +datum=WGS84" <br>seoul032801<-spTransform(seoul032801, <br>                         CRS("+proj=utm +north +zone=52 +datum=WGS84"))</p><p>#variogram modeling<br>seoul032801_var<-variogram(PM10 ~1, data=seoul032801, width = 2800, cutoff =33000)<br>seoul032801_var<br>plot(seoul032801_var, cex = 1.5, pch= 16, col = "black")<br>model032801<- fit.variogram(seoul032801_var,vgm(psill=110,model="Sph",range=5000,nugget=0),fit.method =7)</p><p> </p><p>model032801   #give the parameters<br>plot(seoul032801_var,model=model032801, col="black", pch=16,cex = 1.3,<br>     xlab="Distance (m)", ylab = ~ "Semivariance ( " * mu * g^2
 / m^3 * ")",<br>     main=" Semivariogram for 032801")</p><p> </p><p>Orpheus </p></div><br><br/><br/><table border=0 cellpadding=0 cellspacing=0 ><tr><td style='vertical-align: top;font-size:9pt;'><div jquery1411706373835="566"><br></div></td></tr></table><br><img src="cid:362383919-12032001-0125025201690011" width='600px' border=0>
<div id='TMSMDN' style="background:url('http://mail.gist.ac.kr:80/mail/receiveMDN.do?mdnData=oGhEpHGdw7UD%2BvJWe%2BEHzv%2F%2B7KeVmNi4Ys%2B0BDhRrWrTV2tbh%2FI3ggBb54rguw%2F7YGOu2IalTix3%0AdZYX5AKyTL3zUR6X8hTjQwhEqTeows6H6oozE3jTHKEF%2ByOWohxCgvg9fZ3AFep6t3%2BH4vbs%2FA%3D%3D%0A')"></div>