.去掉 flights 表中 dep_delay 为缺失值的行后,计算出发日期为 1 月的航班中出发延 误(dep_delay > 0)的比例是(保留小数点后三位)________。
时间: 2024-03-17 17:46:11 浏览: 29
你可以使用以下代码来计算出发日期为 1 月的航班中出发延误的比例(保留小数点后三位):
```R
library(nycflights13)
# 读取数据集
data("flights")
# 去掉 dep_delay 为缺失值的行
flights_no_missing <- flights[!is.na(flights$dep_delay),]
# 计算 1 月出发航班的总数
jan_flights <- nrow(flights_no_missing[flights_no_missing$month == 1,])
# 计算 1 月出发航班中出发延误的比例
delayed_flights <- nrow(flights_no_missing[flights_no_missing$month == 1 & flights_no_missing$dep_delay > 0,])
delayed_ratio <- delayed_flights / jan_flights
# 输出结果
print(paste("出发日期为 1 月的航班中出发延误的比例为:", round(delayed_ratio, 3)))
```
在这个代码中,我们首先使用 `nycflights13` 包中的 `flights` 数据集,然后使用 `!is.na()` 函数和逻辑向量来去掉 `dep_delay` 为缺失值的行。接下来,我们使用 `nrow()` 函数和逻辑向量来计算出发日期为 1 月的航班总数和出发延误的航班数。最后,我们将出发延误的航班数除以总数,得到出发日期为 1 月的航班中出发延误的比例,并使用 `round()` 函数保留小数点后三位。最终,我们使用 `print()` 函数输出计算结果。
运行以上代码后,你将得到出发日期为 1 月的航班中出发延误的比例。
相关推荐
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![rar](https://img-home.csdnimg.cn/images/20210720083606.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![gz](https://img-home.csdnimg.cn/images/20210720083447.png)
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![rar](https://img-home.csdnimg.cn/images/20210720083606.png)