Plot coordinates as points on a map

Question

I have read similar questions on this site and haven't been able to replicate the code for my particular dataset (i.e. "https://stackoverflow.com/questions/65083749/why-dont-i-install-package-plotgooglemaps; Plot coordinates on map). I am trying to plot specific locations (GPS coordinates) as points on a global map. This map would preferably be in the form of a satellite image but any form could also work. I do not, however, have an API key.

I am working in R and a subset of my dataframe looks like this:

Location	Lon	Lat
Zakynthos	20.75	37.85
Zafaraan	18.73	30.39
Fethiye	29.06	36.67

Thanks all SHoekstra

I have checked out similar questions:

Why don't I install package "plotGoogleMaps"?

Plot coordinates on map

I am struggling to get it to work on my data for some reason.

Attempt 1

# My data stored in dataframe called "Data"
library("ggmap")
library(maptools)
library(maps)
mapWorld <- borders("world", colour="gray50", fill="white")
mp <- ggplot() + mapWorld

mp + geom_point(data = Data, aes(x = Longitude, y = Latitude), alpha = 0.5)

Attempt 2

library("ggmap")
library(maptools)
library(maps)

lon <- c(Data$Longitude)
lat <- c(Data$Latitude)
df <- as.data.frame(cbind(lon,lat))

# USING MAPS
map("world", fill=TRUE, col="white", bg="lightblue", ylim=c(-60, 90), mar=c(0,0,0,0))
points(lon,lat, col="red", pch=16)

Attempt 3

library("ggmap")
library(maptools)
library(maps)

#Using GGPLOT, plot the Base World Map
mp <- NULL
mapWorld <- borders("world", colour="gray50", fill="gray50") # create a layer of borders
mp <- ggplot() +   mapWorld

#Now Layer the cities on top
mp <- mp+ geom_point(aes(x=Data$Longitude, y=Data$Latitude) ,color="blue", size=3) 
mp

Attempt 4 - could not install "plotGoogleMaps" package

# Create maps 5
#install.packages("plotGoogleMaps", repos="http://R-Forge.R-project.org")
#install.packages("plotGoogleMaps")
#library("plotGoogleMaps")


lon <- c(Data$Longitude)
lat <- c(Data$Latitude)

# make your coordinates a data frame 
coords <- as.data.frame(cbind(lon,lat))

# make it a spatial object by defining its coordinates in a reference system
coordinates(coords) <- ~lat+lon 

# you also need a reference system, the following should be a fine default
proj4string(coords) <- CRS("+init=epsg:4326")

# Note: it is a short for: 
CRS("+init=epsg:4326")
> CRS arguments:
  >  +init=epsg:4326 +proj=longlat +datum=WGS84 +no_defs +ellps=WGS84 +towgs84=0,0,0 

# then just plot
a <- plotGoogleMaps(coords)
# here a <- avoids that you get flooded by the html version of what you plot

Answer 1

Here try the folowwing code https://datavizpyr.com/how-to-make-world-map-with-ggplot2-in-r/

library(ggplot2)
library(tidyverse)

world <- map_data("world")

ggplot() +
  geom_map(
    data = world, map = world,
    aes(long, lat, map_id = region),
    color = "black", fill = "lightgray", size = 0.1
  )+
  geom_point(data=data, aes(Lon,Lat), color="red")