如何在r中根据两个变量对单列进行分组。

我有一个数据框,有四列,格式如下。

第1列:0黄色(8个观测值)第2列:0紫色(9个观测值)第3列:6黄色(11个观测值)第4列:6紫色(12个观测值)。

Yellow_0 <- c(2,5,6,2,6,4,35,6,NA,NA,NA,NA)
Purple_0 <- c(12,34,34,54,23,33,2,12,23,NA,NA,NA)
Yellow_6 <- c(31,23,4,5,56,43,18,33,5,23,33,NA)
Purple_6 <- c(23,5,23,33,45,66,12,23,2,2,23,24)

我想按时间(0 & 6)和颜色(黄色和紫色)进行分组。我尝试了下面的代码(导入csv文件后),它同时按时间和颜色(共4组)对变量进行分组,而不是按时间(两组)和颜色(两组)进行分组。library(tidyverse)
library(reshape2)
DF <- melt(DF, na.rm = TRUE)
DF <- DF %>% group_by(variable)
a <- ggplot(DF, aes(x=variable, y= value, colour = variable)) + geom_boxplot()

如何对时间和颜色进行 “group_by “功能?

解决方案:

我们可以 separate 将列名改成 “长 “格式后一分为二。

library(dplyr)
library(tidyr)
library(ggplot2)
DF %>%
   pivot_longer(cols = everything(), values_drop_na = TRUE) %>%
   separate(name, into = c('color', 'time')) %>%
   ggplot(aes(x = time, y = value, fill = color)) + 
         geom_boxplot() + 
         facet_wrap(~ color)

资料

DF <- data.frame(Yellow_0, Purple_0, Yellow_6, Purple_6)

给TA打赏
共{{data.count}}人
人已打赏
未分类

在导航组件中检测弹出

2022-9-8 11:55:38

未分类

我不能用scrapy提取这个网址

2022-9-8 12:06:34

0 条回复 A文章作者 M管理员
    暂无讨论,说说你的看法吧
个人中心
购物车
优惠劵
今日签到
有新私信 私信列表
搜索