已经提供了一个称为出租车的数据框,现在我必须执行以下操作,但是我被困在最后一步...
#创建my_distance和差异
taxis_my_dist <- taxis %>%
mutate(my_distance = hav_dist(pickup_longitude , pickup_latitude ,dropoff_longitude, dropoff_latitude ),
diff = trip_distance-my_distance)
#找到差异的最小值和最大值
max(taxis[,diff])
min(diff)