如何在R中没有ggplot2的情况下共享组合图中相同的X轴？

问题描述

我正在尝试将两个时间序列合并到一个共享X轴相同值的绘图中。当我使用下面的代码时，我达到了这些目标。但是，我只想为该系列显示一个X轴，并且我也想删除该图右侧的Y轴。我的数据集是Yahoo Finance的两个财务变量。我使用“ quantmod”包提取数据，并使用默认函数“ plot”以所需的方式可视化序列。

PS：我使用“ ggplot2”包得到了一些结果，但它们与我的目标不太吻合。

install.packages('quantmod')
library(quantmod)

## Get the data

# OVX
getSymbols(Symbols = "^OVX",from = "2007-05-10",to = "2020-01-01",src = "yahoo")

# USO
getSymbols(Symbols = "USO",src = "yahoo")


## PLOTS

par(mfcol=2:1,xaxt = "s")
plot(USO[,"USO.Adjusted"],main="USO",type = "l",lwd = 0.7,grid.col = NA,axes = F)

plot(OVX[,"OVX.Adjusted"],main="OVX",lwd = 0.2,grid.col = NA)

我还不能在此处插入图片，然后在下面有一个链接可以查看我的图。

Both Series Plotted

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）