绘制多列但一行的值答案

【问题标题】：Plotting values from multiple columns but for one row绘制多列但一行的值
【发布时间】：2015-03-03 08:17:16
【问题描述】：

我有单行多列的数据。我想在单个图中绘制每列的数据。我有 100 列这样的。什么是最好的方法在 R 中执行此操作。

matplot(df[1,],type="o")

我已经为以下数据尝试了各种选项，例如上面的：

  gene  Sample_23770_A54T_RNAX  Sample_27931_RNAX   Sample_28891_RNAX   Sample_28897_RNAX Sample_28977_RNAX Sample_28979_RNAX   Sample_PM100_Z1_1_RNA   Sample_PM117_Z10_1_Case_RNASeq Sample_PM117_Z1_1_Case_RNASeq
  CD274 5.9315  1.9569  10.3786 5.2705  5.7112  1.814   0.3493  0.6846  1.0373

另外，我可以对多列使用 ggplot 函数吗？基本上，我想绘制单行的表达式值，比较 100 个不同的列。

【问题讨论】：

如果可以，请使用melt() 函数重塑数据，将行作为列。
来自问题“在单个图中绘制每列的数据”

标签： r plot ggplot2 dataframe

【解决方案1】：

使用ggplot2：

library(ggplot2)
cd274 <- read.table(text = "gene  Sample_23770_A54T_RNAX  Sample_27931_RNAX   Sample_28891_RNAX   Sample_28897_RNAX Sample_28977_RNAX Sample_28979_RNAX   Sample_PM100_Z1_1_RNA   Sample_PM117_Z10_1_Case_RNASeq Sample_PM117_Z1_1_Case_RNASeq
CD274 5.9315  1.9569  10.3786 5.2705  5.7112  1.814   0.3493  0.6846  1.0373", header = T)
cd274 <- melt(cd274[, 2:ncol(cd274)])
ggplot(cd274, aes(x = variable, y = value)) + geom_bar(stat = "identity") + coord_flip()

【讨论】：