Load occurrence data
read.csv("C:/Users/Hp/Desktop/Demo data_LatLong.csv")
Occurrence_data<- read.csv("C:/Users/Hp/Desktop/Demo data_LatLong.csv", header=TRUE, sep=",")
View(Occurrence_data)
library(maps)
library(mapdata)
library(mapproj)
Plot occurrence points on a map
ggplot() +
borders("world", colour = "gray50", fill = "white") + # Add world borders
geom_point(mapdata = Occurrence_data, aes(x = longitude, y = latitude), color = "blue", alpha = 0.5) + # Add occurrence points
ggtitle("Distribution map of plant species")
install.packages("tidyverse")