在R中绘制插图

时间:2019-07-08 17:57:03

标签: r

我想在某个时域内在已经存在的图形内绘制子图。这是一些显示两个图形的代码:

par(mfrow=c(2,1))
par(mar = c(2,3.5,0.7,0.3))
par(cex.axis=1.05, cex.lab=1.1)
par(tck=-0.03, mgp=c(2,0.5,0))

t<-seq(0,100,0.1)
f<-exp(-0.05*t)*sin(0.5*t)
g<-0.5*exp(-0.05*t)*cos(2*t)
h<-exp(-0.03*t)*cos(2*t)

matplot(t, cbind(f,g) , type="l", lty=c(1,1), xlab="", ylab="")
matplot(t,cbind(f,h) , type="l", lty=c(1,1), xlab="", ylab="")

par(mfrow=c(1,1))

我想在每个图内显示70 <= t <= 80的子图。感谢您的阅读。

0 个答案:

没有答案