绘图百分比错误

时间:2017-03-11 09:39:52

标签: r plot graph

我试图在同一图中绘制具有相同轴的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)])),输出中似乎没有错误,但我无法在图中输出它。

0 个答案:

没有答案