美文网首页R - tips
dplyr :: case_when

dplyr :: case_when

作者: 董八七 | 来源:发表于2018-03-30 15:27 被阅读40次

@rensa_co Mar 21 dplyr :: case_when与geom_text(或ggrepel)相得益彰,因为当您想以编程方式标记#rstats图中的一些最有趣的功能时! 标准可以像你想的那样复杂

library(tidyverse)
library(ggrepel)
mydata = data_frame(x = 1:10, y = rnorm(10), name = c("Apple", 
  "Banana", "Kiwi", "Orange", "Watermelon", "Grapes", "Pear", 
  "Cantelope", "Tomato", "Satsuma")) %>% 
  mutate(name_poor = case_when(y < 0 ~ name, TRUE ~ ""))

ggplot(mydata, aes(x = x, y = y)) + geom_point(size = 5) + 
  geom_text_repel(aes(label = name_poor), 
  point.padding = 2)

相关文章

网友评论

本文标题:dplyr :: case_when

本文链接:https://www.haomeiwen.com/subject/khsicftx.html