Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/cassandra/3.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
如何使用较小的值在R ggplot2中绘制相同图形中的两条线_R_Ggplot2 - Fatal编程技术网

如何使用较小的值在R ggplot2中绘制相同图形中的两条线

如何使用较小的值在R ggplot2中绘制相同图形中的两条线,r,ggplot2,R,Ggplot2,我有以下csv格式的数据 0.828666667 0.100333333 0.725666667 0.153666667 0.364333333 0.036666667 0.475666667 0.051 0.522333333 0.052333333 0.457 0.041666667 0.644666667 0.093333333 0.404333333 0.039333333 0.497 0.042333333 0.155666667

我有以下csv格式的数据

0.828666667 0.100333333
0.725666667 0.153666667
0.364333333 0.036666667
0.475666667 0.051    
0.522333333 0.052333333    
0.457   0.041666667    
0.644666667 0.093333333    
0.404333333 0.039333333    
0.497   0.042333333    
0.155666667 0.031666667    
0.160666667 0.081333333    
0.145666667 0.026666667    
0.138666667 0.033666667    
0.094333333 0.03    
0.141   0.023666667    
0.148666667 0.052    
0.195666667 0.039    
0.196333333 0.039333333
......
我正在使用以下代码

library(ggplot2)
data<-read.csv("sample.csv",header=TRUE,sep=",")
ggplot(data,aes(x=A,y=B,))+ geom_line() + scale_x_continuous(breaks=seq(0,9,0.5)) + 
scale_y_continuous(breaks=seq(0,9,0.5))
库(ggplot2)

数据我不确定我是否完全理解你想要做什么。但我试图从你们的数据中得到类似于你们第二个图的东西

data <- read.table(text="0.828666667 0.100333333
0.725666667 0.153666667
0.364333333 0.036666667
0.475666667 0.051    
0.522333333 0.052333333    
0.457   0.041666667    
0.644666667 0.093333333    
0.404333333 0.039333333    
0.497   0.042333333    
0.155666667 0.031666667    
0.160666667 0.081333333    
0.145666667 0.026666667    
0.138666667 0.033666667    
0.094333333 0.03    
0.141   0.023666667    
0.148666667 0.052    
0.195666667 0.039    
0.196333333 0.039333333")
names(data) <- c("A", "B")
# prepare data for plotting
require(reshape2)
data$id <- 1:nrow(data)
df <- melt(data, id.var="id")
# plot
library(ggplot2)
ggplot(df, aes(x=id, y=value, color=variable)) + geom_line() 

数据我想你需要稍微操纵一下数据

library(reshape2)
library(ggplot2)

dat <- YOUR CSV
names(dat) <- c('a', 'b')

# need an x for the plot 
dat$Num <- as.numeric(row.names(dat))

meltDat <- melt(dat, id.vars = 'Num')

ggplot(meltDat, 
       aes(x = Num, y = value, group = variable, color = variable)) +
geom_line()
library(重塑2)
图书馆(GG2)

谢谢你的回复,我现在尝试了你的代码来获取我的数据,但是我在meltDat阶段遇到了一个错误,很抱歉。。。R区分大小写,
num
变量为小写。现在应该可以了。我不确定我是否理解您的第二点,但如果您希望关注特定的时间间隔,我会研究
xlim
&
ylim
?感谢您的解决方案:)在第二点中,我有两列数据,范围从0到15(当我看到两列中的值时)所以我想在x轴和y轴上用0到15的相同比例。。为了实现这一点,我按照ggplot(meltDat,aes(x=num,y=value,group=variable,color=variable))+xlim(0,15)+ylim(0,15)+geom_-line()进行了操作。。。但它给出了一些警告:删除了包含缺失值的330行(geom_path),所以请告诉我打印时是否删除了数据?谢谢你想画x坐标和y坐标的列是吗?根据你的图表,你会有三列