###Parameters
> pi <- 3.1415926
##speed unit all by knots
> line_of_sight_speed <- c(39.77,39.14,60.8,79.85,100.64,125.35)
> satelite_speed <- 97.2
###Calculate the angle bias from the satellite direction by average 463 knots flight speed
> flight_speed <- 432
> cos_angle_by_pi <- (line_of_sight_speed + satelite_speed)/flight_speed
> angle_by_pi <- acos(cos_angle_by_pi)
> angle_432 <- 180/(3.1415926/angle_by_pi)
> angle_432
[1] 71.51477 71.60285 68.54682 65.80534 62.74426 58.99171
###Calculate the angle bias from the satellite direction by average 463 knots flight speed
> flight_speed <- 463
> cos_angle_by_pi <- (line_of_sight_speed + satelite_speed)/flight_speed
> angle_by_pi <- acos(cos_angle_by_pi)
> angle_463 <- 180/(3.1415926/angle_by_pi)
> angle_463
[1] 72.79259 72.87419 70.04679 67.51774 64.70365 61.27086
###Summary
> summary_table
事件--event [,1] [,2] [,3] [,4] [,5] [,6]
時間--time "18:29" "19:40" "20:40" "21:40" "22:40" "00:11"
視速度-line_of_sight_speed "39.77" "39.14" "60.8" "79.85" "100.64" "125.35"
飛速432節的偏角--angle_by432knots "71.5" "71.6" "68.5" "65.8" "62.7" "58.9"
飛速432節距離distance_in_between_by432knots "0" "944" "798" "798" "798" "1210"
飛速463節偏角angle_by463knots "72.8" "72.9" "70.1" "67.5" "64.7" "61.3"
飛速463節距離distance_in_between_by463knots "0" "1015" "858" "858" "858" "1301"
>
5. 馬航失蹤航班的航跡和終點位置。
(請看續篇)