给定持续时间和距离计算速度

Calculate speed given a duration and distance

我有这些持续时间(小时:分钟):

duration <- c(00:35, 00:47, 01:38, 02:35, 00:15, 00:45)

这些距离(公里):

distance_in_km <- c(17.46, 16.48, 37.73, 48.9, 15.61, 6.79)

我如何在 R 中(1)在 km/hour 中计算速度和(2)在 miles/hour 中计算速度?欢迎使用 lubridate 包的解决方案。

通过 lubridate 包,您可以使用类似这样的东西。首先,您必须转换字符向量中的持续时间。

library(lubridate)
duration <- c("00:35", "00:47", "01:38", "02:35", "00:15", "00:45")
d <- hm(duration)
time_length(d,"hour")
[1] 0.5833333 0.7833333 1.6333333 2.5833333 0.2500000 0.7500000

然后你可以计算km/h:

distance_in_km <- c(17.46, 16.48, 37.73, 48.9, 15.61, 6.79)
time_in_hours <- time_length(d,"hour")
distance_in_km/time_in_hours

和每小时英里数:

(distance_in_km*0.621371192)/time_in_hours