# NOT RUN {
## (1) get example DEM data
dsmFn <- system.file("extdata", "mrbiko.tif", package = "uavRmp")
tutorial_flightArea <- system.file("extdata", "positions.csv", package = "uavRmp")
## (2) make position flight plan
makeTP  <-  makeTP(missionTrackList= tutorial_flightArea,
                   demFn = dsmFn,
                   uavType = "solo",
                   followSurfaceRes=5,
                   launchPos = c(8.679,50.856))
# }
Run the code above in your browser using DataLab