У меня есть файл csv с такими параметрами: Long, Lat, station_name, Depth. Я создал карту с названием станции в виде точек. Я хотел бы добавить значения глубины как изобаты. Возможно ли это?
feamp_st <-read.csv (file.choose ("feamp_station"), header = TRUE, dec = ".", Sep = " ; ", quote =" "") </p>
map ("italy", fill = TRUE, col = "white", bg = "lightblue", xlim = c (13,15), ylim = c (40,41.5), mar = c (0,0,0,0))
mp <- NULL mapWorld2 <- border ("italy", xlim = c (13 , 15), ylim = c (40,41.5), color = "gray50", fill = "gray50") </p>
mp2 <- ggplot () + mapWorld2 </p>
mp3 <- mp2 + geom_point (aes (x = Lon, y = Lat), color = "blue", data = feamp_st) </p>
mp4 <- mp3 + geom_point (aes (x = Lon, y = Lat, color = station_name) , data = feamp_st, alpha = 0.9) + scale_colour_manual (values = c ("A35_bis" = "красный", "PS1" = "синий", "PS2" = "оранжевый", "PS3" = "желтый", "A42_bis" = "розовый", "PP1" = "зеленый", "PP2" = "черный", "PP3" = "голубой", "PP4" = "коричневый", "PP5" = "темно-синий", "TG0" "=" серый ")) </p>
mp5 <- mp3 + geom_point (aes (x = Lon, y = Lat, fill = Depth, color = station_name), data = feamp_st, alpha = 0.9) + scale_colour_manual (values = c ("A35_bis" = " красный "," PS1 "=" синий "," PS2 "=" оранжевый "," PS3 "=" желтый "," A42_bis "=" розовый "," PP1 "=" зеленый "," PP2 "=" черный " , "PP3" = "голубой", "PP4" = "коричневый", "PP5" = "темно-синий", "TG0" = "серый")) </p>