---
title: "课后作业8"
subtitle: 《区域水环境污染数据分析实践》<br>Data analysis practice of regional water environment pollution
author: 苏命、王为东<br>中国科学院大学资源与环境学院<br>中国科学院生态环境研究中心
date: today
lang: zh
resources:
 - "*.pdf"
 - "*.sas"
format:
  revealjs:
    theme: dark
    slide-number: true
    chalkboard:
      buttons: true
    preview-links: auto
    lang: zh
    toc: true
    toc-depth: 1
    toc-title: 大纲
    logo: ./_extensions/inst/img/ucaslogo.png
    css: ./_extensions/inst/css/revealjs.css
    pointer:
      key: "p"
      color: "#32cd32"
      pointerSize: 18
revealjs-plugins:
  - pointer
filters:
  - d2
---

```{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 rmdify::slideend(wechat = FALSE, type = "public", tel = FALSE, thislink = "https://drc.drwater.net/course/public/RWEP/PUB/SD/")`