分享

tidyr总结篇

 医科研 2021-01-25

  

欢迎来到医科研,这里是白介素2的读书笔记,跟我一起聊临床与科研的故事, 生物医学数据挖掘,R语言,TCGA、GEO数据挖掘。

  tidyr总结篇 

gather(data,key="",value="") ## key是变量,value是值
gather的意义是重新塑造数据的变量,原有数据的变量并不是真正的变量
这时候变量不是变量,变量还是变量。

举例说明: 神奇的gather

参数1:data 参数2:key变量名,参数3:value变量名 参数4:gather的变量指定
其中-表示除外某向量,全部gather

stocks <- tibble(
  time = as.Date('2009-01-01') + 0:9,
  X = rnorm(1001),
  Y = rnorm(1002),
  Z = rnorm(1004)
)
stocks
## gather起stocks中的,X,Y,Z. 新命名一个key,命名一个value, 除去time不变化
gather(stocks, stock, price, -time)
stocks %>% gather(stock, price, -time)##保留time不变化

##
mini_iris <- iris[c(151101), ]
mini_iris
gather(mini_iris,key = "flower_att",value = "value",Sepal.Length, Sepal.Width, Petal.Length, Petal.Width)

gather(mini_iris,key = "flower_att",value = "value",Sepal.Length:Petal.Width)
## -表示不gather的变量
gather(mini_iris,key = "flow_att",value = "value",-Species)

## 省略掉key, value
gather(mini_iris,flow_att,value,-Species)##得到的结果相同

在管道中演示一套

library(dplyr)
mini_iris <-
  iris %>%
  group_by(Species) %>%
  slice(1)
mini_iris %>% gather(key = flower_att, value = measurement, -Species)

by_cyl <- group_by(mtcars, cyl)
slice(by_cyl, 1:2)

    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多