84 lines
2.1 KiB
Plaintext
84 lines
2.1 KiB
Plaintext
---
|
||
title: "课后作业6"
|
||
subtitle: 《区域水环境污染数据分析实践》<br>Data analysis practice of regional water environment pollution
|
||
author: 苏命、王为东<br>中国科学院大学资源与环境学院<br>中国科学院生态环境研究中心
|
||
date: today
|
||
lang: zh
|
||
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)
|
||
```
|
||
|
||
## [第6次课后作业](第6次课后作业_模板.html)
|
||
|
||
1. 如何在 R 中将数字 10 赋值给变量 x？
|
||
2. 在 R 中，如何创建一个包含数字 1 到 5 的向量？
|
||
3. 编写一个条件语句，如果变量 age 大于等于 18，则打印 "成年人"，否则打印 "未成年人"。
|
||
4. 使用 for 循环打印从 1 到 10 的整数。
|
||
5. 编写一个名为 addition 的函数，接受两个参数 a 和 b，返回它们的和。
|
||
6. 创建一个列表，包含三个元素：一个数字向量、一个字符向量和一个逻辑向量。
|
||
7. 使用 read.csv() 函数读取名为 data.csv 的 CSV 文件，并将数据存储在一个名为 data 的数据框中。
|
||
8. 从数据框中选择前五行，并将结果存储在一个新的数据框中。
|
||
9. 将字符串 "hello world" 转换为大写。
|
||
10. 从数据框中选择 score 列大于等于 90 的行。
|
||
|
||
## **data.csv**内容
|
||
|
||
```
|
||
name,age,score
|
||
Alice,25,85
|
||
Bob,30,92
|
||
Charlie,28,89
|
||
David,22,95
|
||
Eva,35,87
|
||
Frank,27,91
|
||
Grace,29,88
|
||
Helen,26,93
|
||
Ivan,31,86
|
||
Jack,24,94
|
||
Kelly,32,89
|
||
Lily,28,90
|
||
Mike,33,85
|
||
Nancy,27,92
|
||
Olivia,34,88
|
||
Peter,29,93
|
||
Queen,25,89
|
||
Ryan,30,94
|
||
Samantha,26,91
|
||
Tom,31,87
|
||
|
||
```
|
||
|
||
|
||
## 欢迎讨论！{.center}
|
||
|
||
|
||
`r rmdify::slideend(wechat = FALSE, type = "public", tel = FALSE, thislink = "https://drwater.rcees.ac.cn/course/public/RWEP/@PUB/SD/")`
|
||
|