在R中使用ggplot2从熔化的数据框中引用x轴变量进行绘图

在R中使用ggplot2从熔化的数据框中引用x轴变量进行绘图,r,ggplot2,reshape2,melt,R,Ggplot2,Reshape2,Melt,我有一个数据框df,有10列,如下所示 row.names c(300, 400, 500, 600, 700) X1 X2 X3 X4 X5 X6 X7 X8 X9 1 absTLM_3_4 300 -4.147782e-08 -3.360635e-08 -3.306786e-08 -3.133482e-08 -3.124207e-08 -3.056317e-08 -3.020253e-08 -2.950814e-08 -2.9551

我有一个数据框
df
,有10列,如下所示

row.names   c(300, 400, 500, 600, 700)  X1  X2  X3  X4  X5  X6  X7  X8  X9
1   absTLM_3_4  300 -4.147782e-08   -3.360635e-08   -3.306786e-08   -3.133482e-08   -3.124207e-08   -3.056317e-08   -3.020253e-08   -2.950814e-08   -2.955155e-08
2   absTLM_4_5  400 -3.703708e-08   -3.013687e-08   -2.746570e-08   -2.627163e-08   -2.528328e-08   -2.457543e-08   -2.437666e-08   -2.412295e-08   -2.358447e-08
3   absTLM_5_6  500 -3.575756e-08   -2.694028e-08   -2.457341e-08   -2.331162e-08   -2.262283e-08   -2.180886e-08   -2.104917e-08   -2.101946e-08   -2.081650e-08
4   absTLM_6_7  600 -2.454283e-08   -2.152165e-08   -1.967477e-08   -1.885213e-08   -1.835989e-08   -1.814608e-08   -1.806438e-08   -1.785795e-08   -1.784158e-08
5   absTLM_7_8  700 -2.317125e-10   -1.029456e-08   -1.076342e-08   -1.365264e-08   -1.378578e-08   -1.457421e-08   -1.463740e-08   -1.480280e-08   -1.515121e-0
现在我想在x轴上绘制第1列,在y轴上绘制第2、5、6和8列。为此,我使用以下代码段:

x4 <- melt(df, id=names(df)[1], measure=names(df)[c(2, 5, 6, 8)], variable = "cols")
plt <- ggplot(x4) +
        geom_line(aes(x=x,y= value, color=cols), size=1) +
        labs(x = "x", y = "y")
colnames(df)[1] <- "x"

x4看起来您的列名有问题。试试这个:

x4 <- melt(df, id=names(df)[1], measure=names(df)[c(2, 5, 6, 8)], variable = "cols")
colnames(x4)[1] <- "x"
plt <- ggplot(x4) +
        geom_line(aes(x=x,y= value, color=cols), size=1) +
        labs(x = "x", y = "y")

x4以下代码未能正确绘制数据的原因是列标题名
c(300400500600700)
是数据框
df
中第一列的名称

x4 <- melt(df, id=names(df)[1], measure=names(df)[c(2, 5, 6, 8)], variable = "cols")
plt <- ggplot(x4) +
        geom_line(aes(x=x,y= value, color=cols), size=1) +
        labs(x = "x", y = "y")
一旦更改了列标题名称,则数据框可以融化,然后打印工作正常

x4 <- melt(df, id=names(df)[1], measure=names(df)[c(2, 5, 6, 8)], variable = "cols")
plt <- ggplot(x4) +
        geom_point(aes(x=x,y= value, color=cols), size=2) +
        labs(x = "x", y = "y")

x4
中没有名为
x
的列。请参见
head(x4)
,并相应地调整
geom_线(aes())
。该列的名称似乎为
X1
,而不是
x
@BrandonBertelsen。我需要的第一列的列标题似乎命名为
c(300400500600700)
,,现在,当我使用
plt时,我认为您应该重命名列并使用典型样式(仅列名称中没有空格
\uu
)<代码>colnames(df)[1]是的,你是对的。更改列标题名称后,它会工作!谢谢你的建议。