R作图求助。几个图形合并

我用R属于很初级的水平

我是用R做项目反应理论分析，非参数项目反应。
library(foreign)
library(mokken) #opens Mokken library
data<-data.frame(read.dta("c:/data/wechat.dta"))
scales <-aisp(data[,7:14],search="normal",lowerbound=.3,alpha=.05,popsize=20,verbose=TRUE)

mono<-check.monotonicity(data[,7:14],minvi=0.03,minsize=60)
summary(mono)
plot(mono)


#mono 是用于检验各个题目的单调性，plot则是作图，这个时候，窗口出现 Waiting to confirm page change...
然后单击出图的窗口，会出来题目1 的单调性图（图1），再单击会出现题目2的图像（图2），共有8个题目，一直单击到出现第8个。。

我的问题是，在R里面，如何写命令，让程序输出一个图像包含8个题目的单调性图 （如图3）？

ps：有程序的话，请贴上，我购买。不要跟我说截图  用Photoshop！！！

谢谢大家

这个是图。。。

在画图之前加上par(mfrow=c(2,4)),测试代码如下：
x<-rnorm(100)
par(mfrow=c(2,4))
for(i in 1:8)
{
plot(x)
}
就有类似图三的图了。。。其中图是按行排列的。。。还有不懂可以继续提问。。。不知道我又没有理解错？

曲散人终 发表于 2015-1-5 11:42
在画图之前加上par(mfrow=c(2,4)),测试代码如下：
x

图1 里面不是有2个坐标轴的图嘛，我想要每道题目的图形的右边部分，然后组成图3那样的图 （一个小图里面只有一条显示单调性的曲线，不要左边的多条曲线的图）。

还有，就是你这个par(mfrow=c(2,4)) 我还是不懂，你的变量x我要换成什么？

library(foreign)
library(mokken) #opens Mokken library
data<-data.frame(read.dta("c:/data/wechat.dta"))
scales <-aisp(data[,7:14],search="normal",lowerbound=.3,alpha=.05,popsize=20,verbose=TRUE)

mono<-check.monotonicity(data[,7:14],minvi=0.03,minsize=60)
summary(mono)
par(mfrow=c(2,8))#加在这里
plot(mono)
从你的图来看，是一共有16个图吗？你要吧右边八个图画到一个图里？那可能要结合数据来分析了。。。

曲散人终 发表于 2015-1-5 15:55
library(foreign)
library(mokken) #opens Mokken library
data

是8个图，一次输出的图有左右两边 2个坐标轴的图，我只需要右边的图。例如图1我要的是右边的图，图2我要的也是右边的图，然后8个图的右边部分合并为类似图3的图

曲散人终 发表于 2015-1-5 15:55
library(foreign)
library(mokken) #opens Mokken library
data

你这样的命令，我试过了，不行。。。

兵哥哥 发表于 2015-1-5 16:04
你这样的命令，我试过了，不行。。。

这个错误是因为分辨率太低吗？可以把数据搞出来吗？这样子没办法调试。。。

曲散人终 发表于 2015-1-5 16:19
这个错误是因为分辨率太低吗？可以把数据搞出来吗？这样子没办法调试。。。

数据在这里，谢谢哥们

兵哥哥 发表于 2015-1-5 17:22
数据在这里，谢谢哥们

幸不辱命。。。代码如下：
library(foreign)
library(mokken) #opens Mokken library
data<-data.frame(read.dta("c:/data/wechat.dta"))
scales <-aisp(data[,7:14],search="normal",lowerbound=.3,alpha=.05,popsize=20,verbose=TRUE)

mono<-check.monotonicity(data[,7:14],minvi=0.03,minsize=60)
summary(mono)
par(mfrow=c(2,4))
plot(mono,curve="IRF")
再点一下就可以了。。。