library
(rworldmap)
worldmap <-
getMap
(resolution =
"coarse"
)
plot
(worldmap, col =
"lightgrey"
,
fill = T, border =
"darkgray"
,
xlim =
c
(-180, 180), ylim =
c
(-90, 90),
bg =
"aliceblue"
)
data_frame <-
data.frame
(name =
c
(
"Greece"
,
"France"
,
"Nigeria"
),
latitude =
c
(38.0,46.0,7.0),
longitude =
c
(23.7,2.0,6.0))
points
(x = data_frame$longitude, y = data_frame$latitude)
text
(x = data_frame$longitude, y = data_frame$latitude,
data_frame$name, pos = 4, col =
"blue"
)