tidyverse数据筛选

---
title: "R Notebook"
output: html_notebook
---

```{r}
library(tidyverse)
starwars %>%
select(sex,height,mass,species) %>%
  mutate(height=height/100)  %>%
  filter(species =="Human")  %>%
  group_by(sex) %>%
  summarise( mean(height,na.rm = TRUE))
```

cnliutz

计算机基础教师

发表评论

您的电子邮箱地址不会被公开。 必填项已用*标注