我试图在同一图中绘制具有相同轴的3个图形。 第一个是" y-values"是百分比。 其他2个是小数点,我试图转换为百分比。
我最初使用以下代码:
plot(timeSP500[(N+1):nSP500],sigmaSP500[(N+1):nSP500],type='l', ylim=c(0, 0.05))
par(new=TRUE)
plot(timeSP500[(N+1):nSP500],sqrt(EWSP500[(N+1):(nSP500)]),type='l')
par(new=TRUE)
plot(timeSP500[(N+1):nSP500],sqrt(UVdevSP500[(N+1):(nSP500)]),type='l')
输出没有问题,但它不是我想要的,因为对于第二和第三个图,它们是小数位而不是百分比。所以我添加了百分比功能。
plot(timeSP500[(N+1):nSP500],sigmaSP500[(N+1):nSP500],type='l', ylim=c(0, 0.05))
par(new=TRUE)
plot(timeSP500[(N+1):nSP500],percent(sqrt(EWSP500[(N+1):(nSP500)])),type='l')
par(new=TRUE)
plot(timeSP500[(N+1):nSP500],percent(sqrt(UVdevSP500[(N+1):(nSP500)])),type='l')
有了这个,我得到了错误
plot.window(...)出错:需要有限的' ylim'值
另外:警告信息:
1:在xy.coords(x,y,xlabel,ylabel,log)中:强制引入的NA 2:在min(x)中:min没有非缺失参数;返回Inf
3:在max(x)中:max没有非缺失参数;返回-Inf
这很奇怪,因为如果我只输出percent(sqrt(EWSP500[(N+1):(nSP500)]))
,输出中似乎没有错误,但我无法在图中输出它。