作业2 解析(参考)
预备知识
-
绝对路径和相对路径
-
工作空间的概念(可选)
why:一般不会单独学习,但为了便捷性等原因,几乎任何时候(**特别是文件读取和函数调用)**都会使用到,所以最好还是了解一下.
-
读入csv文件中的数据
why:因为数据直接手动输入的话非常容易出错.加上一般数据量很大,数据都存储在数据文件中
文字教程:https://www.runoob.com/r/r-input-csv-file.html
视频教程(需要了解工作空间):https://www.bilibili.com/video/BV19x411X7C6?p=29
-
Rmarkdwon的使用
老师要求要求提交html格式的文件,所以要知道rmarkdown的语法和使用方法
视频教程:https://www.bilibili.com/video/BV1HA411q7Rd?t=237
数据
学号,姓名,性别,年龄,身高,体重
1,Alice,F,13,56.5,84
2,Becka,F,13,65.3,98
3,Gail,F,14,64.3,90
4,Karen,F,12,56.3,77
5,Kathy,F,12,59.8,84.5
6,Mary,F,15,66.5,112
7,Sandy,F,11,51.3,50.5
8,Sharon,F,15,62.5,112.5
9,Tammy,M,14,62.8,102.5
10,Alfred,M,14,69.0 ,112.5
11,Duke,M,14,63.5,102.5
12,Guido,M,15,67.0 ,133.0
13,James,M,12,57.3,83.0
14,Jeffrey,M,13,62.5,84.0
15,John,M,12,59.0 ,99.5
16,Philip,M,16,72.0 ,150.0
17,Robret,M,12,64.8,128.0
18,Thmoas,M,11,57.5,85.0
19,William,M,15,66.5,112.0
代码
##课后习题3.7
```{r}
library(readr)
date1_url <- "data/data1.csv"
data1 <- read_csv(date1_url,
locale = locale(encoding = "UTF-8"))
```
```{r}
stuInf=data.frame(data1)
stuInf
```
```{r}
attach(stuInf)
plot(体重~身高)
coplot(体重~身高|性别)
coplot(体重~身高|年龄)
coplot(年龄~体重|年龄+性别)
```
## 课后习题3.8
```{r}
cor.test(身高,体重)
```
### 结论:身高和体重是相关的。
人言可畏,愿世间太平.