This presentation will demonstrate my flight path since 2018, and includes the following:

• An overview of my flight path
• Top 5 Visited Airport
• Top 6 Longest Flight
• Total Flight Time
• Average Flight Time Per Year

Note: You can drag the map!

To calculate all my flight time, we can use Duration col and sum it up together.

For example: \[ Hours = hours + \frac{minutes}{60} \\ Total Hours = Hours * Each Flight \]

## Total Flight Time:
##  195 hours and 45 minutes
##  About 8.125 Day(s)

We can calculate average flight time per year using the format:

\[ Avg Flight Time Per Year = \frac{Total Hours}{2023-2018} \] So, the average flight time per year is 39.15 hours.

flight_data = read.csv("flightdiary_enriched.csv")
# Calculate total hours
flight_data = flight_data %>%
  mutate(Duration_hours = as.numeric(hms(Duration))/3600)
total_flight_hours = sum(flight_data$Duration_hours, na.rm = TRUE)

# Convert to hours and minutes
total_hours = floor(total_flight_hours)
total_minutes = round((total_flight_hours - total_hours) * 60)

# Convert to days
total_days = total_hours / 24