0

我想先描述一下我的问题/情况：我有一个庞大的数据集。由于一列中的数字（> 0），我过滤了我的数据。在此列中也有 1、2、3。所以计划是生成一个堆叠的条形图。这些条由另一列表示（12 个不同的名称 - 请参见下面的示例）这是我的数据的一个小示例：

dat <- array(c("dbdb1", "dbdb2","dbdb1",
               "dbdb4","dbdb1","dbdb1",
               "dbdb2","dbdb4","dbdb1",
               1,1,1,2,2,3,1,2,1),dim=c(9,2))

所以现在我要用我的数据集中的数字来分隔它们，subset(data_set, "column"==1)或者==2，==3（这有点难看......）

例子：

mod1=as.vector(data_set, Phospho==1)
mod2=as.vector(data_set, Phospho==2)
    ...

之后，我使用 as.vector 函数将列（在带有 dbdbX 条目的示例中）隔离为向量。as.vector1=as.vector(mod1$dbdbColumn) 现在我尝试使用barplot(table(as.vector1,as.vector2)

但由于它们的长度不同，我不能使用它。

你能帮帮我吗？谢谢！我希望我的问题很清楚，如果不是很抱歉

最好的问候和 thx 提前

4

1 回答 1

0

你的问题有点不清楚。这会给你想要的结果吗？请注意，我已将您的示例数据编辑为数据框，以免将数字强制转换为文本...

dat <- data.frame(category=c("dbdb1","dbdb2","dbdb1","dbdb4","dbdb1","dbdb1","dbdb2","dbdb4","dbdb1"),value=c(1,1,1,2,2,3,1,2,1))
tab <- table(dat$value,dat$category)
barplot(tab,legend=rownames(tab))

结果如下：

堆积条形图

于 2012-10-14T23:21:49.067 回答