update
This commit is contained in:
1
SD/1.9_课后作业6/_extensions
Symbolic link
1
SD/1.9_课后作业6/_extensions
Symbolic link
@@ -0,0 +1 @@
|
||||
../../_extensions
|
||||
83
SD/1.9_课后作业6/index.qmd
Normal file
83
SD/1.9_课后作业6/index.qmd
Normal file
@@ -0,0 +1,83 @@
|
||||
---
|
||||
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://drc.drwater.net/course/public/RWEP/PUB/SD/")`
|
||||
|
||||
42
SD/1.9_课后作业6/第6次课后作业_模板.qmd
Normal file
42
SD/1.9_课后作业6/第6次课后作业_模板.qmd
Normal file
@@ -0,0 +1,42 @@
|
||||
---
|
||||
title: 课后作业6
|
||||
author: 姓名
|
||||
format: html
|
||||
---
|
||||
|
||||
|
||||
# 示例问题,在R中输出`1+2+3+...+100`的结果
|
||||
|
||||
采用`for`循环完成,代码如下:
|
||||
|
||||
```{r}
|
||||
total <- 0
|
||||
for (i in 1:100) {
|
||||
total <- total + i
|
||||
}
|
||||
total
|
||||
```
|
||||
|
||||
|
||||
# 如何在 R 中将数字 10 赋值给变量 x?
|
||||
|
||||
|
||||
# 在 R 中,如何创建一个包含数字 1 到 5 的向量?
|
||||
|
||||
# 编写一个条件语句,如果变量 age 大于等于 18,则打印 "成年人",否则打印 "未成年人"。
|
||||
|
||||
# 使用 for 循环打印从 1 到 10 的整数。
|
||||
|
||||
# 编写一个名为 addition 的函数,接受两个参数 a 和 b,返回它们的和。
|
||||
|
||||
# 创建一个列表,包含三个元素:一个数字向量、一个字符向量和一个逻辑向量。
|
||||
|
||||
# 使用 read.csv() 函数读取名为 data.csv 的 CSV 文件,并将数据存储在一个名为 data 的数据框中。
|
||||
|
||||
# 从数据框中选择前五行,并将结果存储在一个新的数据框中。
|
||||
|
||||
# 将字符串 "hello world" 转换为大写。
|
||||
|
||||
# 从数据框中选择 score 列大于等于 90 的行。
|
||||
|
||||
|
||||
Reference in New Issue
Block a user