绘制预测的S＆amp; P 500收益率与10年期国债收益率

Question

我试图创建一个如下图所示的图表，覆盖10年期国债收益率（红线）与标准普尔500指数股票的10年预测（蓝线）。我如何在同一个情节中绘制两个？这是我想要实现的一个例子：

我从这篇文章中检索了上图： http://jessefelder.tumblr.com/post/126106780155/the-warren-buffett-way-to-avoiding-major-bear

Answer 1

您可以使用ggplot将它们一起绘制：

    p <- ggplot() + geom_point(bonddata,aes(x,y))+
         geom_point(sp500data,aes(x,y))

这应该让你开始，你可以使用其他ggplot功能美观。有关更多信息，请查看此帖子：How to combine 2 plots (ggplot) into one plot?