---
title: "课后作业6"
format:
  dwsd-revealjs:
    logo: _extensions/drwater/dwsd/inst/ucaslogo.png
---


```{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}
#| results: 'asis'
#| echo: false
rmdify::slideend(
  wechat = FALSE,
  type = "public",
  tel = FALSE,
  thislink = "../"
)
```