Построение точек из фрейма данных в отдельный файл формы - PullRequest
Новая
       97

Построение точек из фрейма данных в отдельный файл формы

0 голосов
/ 29 апреля 2020

Привет, я много работал, но не получил действительно четких ответов. По сути, у меня есть фрейм данных с сайтами и химическими анализами с тех сайтов, координаты которых мне удалось преобразовать в геометрию с помощью st_as_sf. Я также использую отдельный шейп-файл с именем Cave_initial. Теперь то, что я хочу сделать, это отобразить точки из информационного кадра в верхней части шейп-файла как одну карту.

Я пытался использовать geom_sf (), но в лучшем случае он отображает точки на одном графике, а затем шейп-файл как отдельный граф. Но они нужны мне вместе. 

   Master_cave_data <- read_xlsx("./JW_cave_master_version.xlsx", range = "C2:AK85") #dataset containing chemical data and lat/long as numerics
   cave_system <- st_read("./IllinoisCaverns/Cave_System.shp") #shapefile created by colleague 

   Master_cave_data <- Master_cave_data %>%
st_as_sf(coords = c('Long_DD', 'Lat_DD'), crs = 4326, sf_column_name = NULL) 
   #transforming my coordinate data into lat/long
   #due to size of datashet dput will not be advisable to display. New column is created using Long/Lat_DD as geometry. 
   Jul_Data <- filter(Master_cave_data, Month == "Jul") # filtering data for one month

   Jul_Coliform_Data_map <- Jul_Data %>%
   ggplot() + 
   geom_sf(data = Jul_Data$Geometry)  + 
   Cave_initial

   Jul_Coliform_Data_map
...