유럽 여행 계획서
library(leaflet)
nation = c("Denmark", "Norway", "Sweden","Finland", "Poland")
day = c(3,7,9,10,2)
lat = c(56.117258,61.624218,60.304023,61.293356,53.345283)
lng = c(9.404116,9.305189,15.389211,25.628174,18.703271)
travelPlan = data.frame(nation=nation, day=day, lat=lat, lng=lng)
group1= subset(travelPlan, day>=7)
group2= subset(travelPlan, day<7)
map = leaflet(travelPlan) %>% addProviderTiles(providers$CartoDB.Positron)%>% setView(lng=17.05, lat=57.78, zoom = 4)%>%addCircleMarkers(data = group1, lng=~lng, lat=~lat, radius=~day*2, color="#24F3E7", group = "group1")%>%addCircleMarkers(data = group2, lng=~lng, lat=~lat, radius=~day*2, color="#24F3E7", group = "group2")%>%addMiniMap(width = 130, height = 130)%>%addPolylines(lng = ~lng, lat = ~lat, weight = 2.0, color = "#377506")%>%addLayersControl(overlay = c("group1","group2"), options = layersControlOptions(collapsed = FALSE));map
1. 덴마크 여정
항공비 | 대한항공 -> 네덜란드항공 경유 = 1,294,800(2024.06.10 기준)
숙소비 | Hotel Norrevang = 430,702(Booking.com, 2인 기준, 조식포함)
식비, 교통비 | 300,000(식비) + 100,000(교통비) = 400,000
총경비 | 1,294,800 + 430,702 + 400,000 = 2,125,502 + (관광비)
2. 노르웨이 여정
항공비 | 노르웨이 에어셔틀 = 94,516(2024.06.13 기준)
숙소비 | Karlotte's apartment = 1,395,900(Booking.com, 2인 기준, 조식x)
식비, 교통비 | 600,000(식비) + 300,000(교통비) = 900,000
총경비 | 94,516 + 1,395,900, 900,000 = 2,390,416 + (관광비)
3. 스웨덴 여정
항공비 | 노르웨이 에어셔틀 = 76,287(2024.06.19 기준)
숙소비 | Camp Ripan = 1,966,558(Booking.com, 2인 기준, 조식포함)
식비, 교통비 | 700,000(식비) + 200,000(교통비(버스 1시간 자유이용권 이용)) = 900,000
총경비 | 76,287 + 1,966,558 + 900,000 = 2,942,845 + (관광비)
4. 핀란드 여정
항공비 | 핀에어 항공 = 84,623 (2024.06.27 기준)
숙소비 | Holiday Village Valle = 1,664,576(Booking.com, 2인 기준, 조식x, 오로라 관찰 가능!)
식비, 교통비 | 700,000(식비) + 300,000(교통비) = 1,000,000
총경비 | 84,623 + 1,664,576 + 1,000,000 = 2,749,199 + (관광비)
5. 폴란드 여정
항공비 | 핀에어 항공 = 160,927(2024.07.06 기준)
숙소비 | Hotel Dunajec = 81,054(Booking.com, 2인 기준, 조식x)
식비, 교통비 | 100,000(식비) + 50,000(교통비) = 150,000
총경비 | 160,927 + 81,054 + 150,000 = 391,981 + (관광비)
예상 총경비
2,988,131(항공) + 5,538,790(숙소) + 3,350,000(식비,교통비) + 500,000(관광비 및 비상금)
= 12,376,921원 (1인 기준 예상 총액)