39 lines
960 B
Plaintext
39 lines
960 B
Plaintext
---
|
|
title: "Location Based Services Assignment 01"
|
|
author: "Erik Neller"
|
|
date: "`r Sys.Date()`"
|
|
output: pdf_document
|
|
---
|
|
|
|
```{r setup, include=FALSE}
|
|
knitr::opts_chunk$set(echo = TRUE)
|
|
library(ggplot2)
|
|
library(DataExplorer)
|
|
library(raster)
|
|
library(rworldmap)
|
|
library(sp)
|
|
library(sf) # https://aur.archlinux.org/packages/udunits
|
|
```
|
|
|
|
## Croatian Destinations
|
|
Write an R script that creates a map of Croatia. On
|
|
the map, mark 3 places you would like to visit.
|
|
Use the rworldmap library. Use Geonames to obtain
|
|
coordinates: https://www.geonames.org
|
|
|
|
|
|
```{r croatia}
|
|
library(rworldmap)
|
|
world <- getMap(resolution = "low")
|
|
plot(world, xlim = c(13, 20), ylim = c(42, 47)
|
|
, asp = 1
|
|
, col = "white"
|
|
,bg = "lightblue", # background (sea) color
|
|
)
|
|
destinations <- data.frame(
|
|
lat = c(45.82, 43.506, 45.07),
|
|
lon = c(15.97, 16.40, 14.56),
|
|
name = c("Zagreb", "Split", "Krk")
|
|
)
|
|
points(destinations$lon, destinations$lat, col = "red", cex = .6)
|
|
``` |