Files
su2026rwep/SD/3.9_课后作业8/index.qmd
T
2026-05-21 12:48:42 +08:00

58 lines
1.5 KiB
Plaintext

---
title: "课后作业8"
format:
dwsd-revealjs:
logo: _extensions/drwater/dwsd/inst/ucaslogo.png
---
```{r}
#| include: false
#| cache: false
lang <- "cn"
require(tidyverse)
require(learnr)
knitr::opts_chunk$set(echo = TRUE)
```
```{r}
#| include: false
#| cache: false
lang <- "cn"
require(tidyverse)
require(learnr)
```
## 第8次课后作业
1. 根据`airqualitydf.xlsx`,按采样点统计白天(8:00-20:00)与夜晚(20:00-8:00)中空气质量指数(AQI)中位数,按城市统计低于所有采样点AQI30%分位值的采样点占比,列出上述占比最高的10个城市(不考虑采样点数低于5个的城市)。
2. 按照不同城市分组,统计白天与夜晚AQI中位数是否具有显著差异。
作业模板:[第8次课后作业_模板.qmd](https://git.drwater.net/course/RWEP/raw/branch/main/SD/20240328_9_课后作业/第8次课后作业_模板.qmd)
## 示例代码
### 基于R的示例结果
- [第8次课后作业R示例代码结果](./第8次课后作业_模板.html)
### 基于SAS的示例结果
- [第8次课后作业SAS示例代码](./第8次课后作业_模板.sas)
- [第8次课后作业SAS示例结果1](./median.pdf)
- [第8次课后作业SAS示例结果2](./freq.pdf)
- [第8次课后作业SAS示例结果3](./airqualitymedianoutrow5.pdf)
- [第8次课后作业SAS示例结果4](./npar1wayConover.pdf)
## 欢迎讨论!{.center}
```{r}
#| results: 'asis'
rmdify::slideend(
wechat = FALSE,
type = "public",
tel = FALSE,
thislink = "../"
)
```