使用 ggplot2 绘制选定的列
plot selected columns using ggplot2
我想绘制多个单独的图,到目前为止我有以下代码:
但是,我不想要数据集中的最后一列;它使 ggplot2 绘制 x 变量 vs x 变量。
library(ggplot2)
require(reshape)
d <- read.table("C:/Users/trinh/Desktop/Book1.csv", header=F,sep=",",skip=24)
t<-c(0.25,1,2,3,4,6,8,10)
d2<-d2[,3:13] #removing unwanted columns
d2<-cbind(d2,t) #adding x-variable
df <- melt(d2, id = 't')
ggplot(data=df, aes(y=value,x=t) +geom_point(shape=1) +
geom_smooth(method='lm',se=F)+facet_grid(.~variable)
我尝试添加
data=subset(df,df[,3:12])
但我认为我写的不正确。请指教。谢谢
以下是你如何做到的,以数据(虹膜)为例:
(i) 绘制所有变量
df <- reshape2::melt(iris, id="Species")
ggplot(df, aes(y=value, x=Species)) + geom_point() + facet_wrap(~ variable)
(ii) 没有 "Petal.Width"
的情节
library(dplyr)
df2 <- df %>% filter(!variable == "Petal.Width")
ggplot(df2, aes(y=value, x=Species)) + geom_point() + facet_wrap(~ variable)
我想绘制多个单独的图,到目前为止我有以下代码:
但是,我不想要数据集中的最后一列;它使 ggplot2 绘制 x 变量 vs x 变量。
library(ggplot2)
require(reshape)
d <- read.table("C:/Users/trinh/Desktop/Book1.csv", header=F,sep=",",skip=24)
t<-c(0.25,1,2,3,4,6,8,10)
d2<-d2[,3:13] #removing unwanted columns
d2<-cbind(d2,t) #adding x-variable
df <- melt(d2, id = 't')
ggplot(data=df, aes(y=value,x=t) +geom_point(shape=1) +
geom_smooth(method='lm',se=F)+facet_grid(.~variable)
我尝试添加
data=subset(df,df[,3:12])
但我认为我写的不正确。请指教。谢谢
以下是你如何做到的,以数据(虹膜)为例:
(i) 绘制所有变量
df <- reshape2::melt(iris, id="Species")
ggplot(df, aes(y=value, x=Species)) + geom_point() + facet_wrap(~ variable)
(ii) 没有 "Petal.Width"
的情节 library(dplyr)
df2 <- df %>% filter(!variable == "Petal.Width")
ggplot(df2, aes(y=value, x=Species)) + geom_point() + facet_wrap(~ variable)