1 2 3 | latitude<- 38.8976831 longitude<- -77.0364972 df=data.frame(latitude,longitude) |
1 2 3 4 5 6 7 | install.packages('plotGoogleMaps') library(plotGoogleMaps) coordinates(df)<-~longitude+latitude # convert to SPDF proj4string(df) <- CRS('+init=epsg:4326') # adding Coordinate Referent Sys. # Create web map of Point data m<-plotGoogleMaps(df,filename='C:/MyNewMap.htm') |
1 2 3 4 5 6 | library(plotGoogleMaps) Longitude=modelerData$%%lat%% Latitude=modelerData$%%lon%% coordinates(modelerData)<-~Longitude+Latitude proj4string(modelerData) <- CRS('+init=epsg:4326') m<-plotGoogleMaps(modelerData,filename='C:/myNewMap.htm') |
欢迎光临 电子技术论坛_中国专业的电子工程师学习交流社区-中电网技术论坛 (http://bbs.eccn.com/) | Powered by Discuz! 7.0.0 |