小编Mad*_*ds 的帖子

我有以下数据集(类:dataframe)

data2 <- read.table(text =
"Date         S        D
199011  1.023247 1.009845
199012  1.050828 1.015818
199101  1.066754 1.023077
199102  1.147112 1.033462
199103  1.160859 1.042610
199104  1.164412 1.049691
199105  1.204586 1.058778
199106  1.173015 1.063795
199107  1.220449 1.074115
199108  1.210946 1.075537
199109  1.219717 1.076117
199110  1.256516 1.080941
199111  1.220505 1.087333
199112  1.288720 1.100406
199201  1.306862 1.106454
199202  1.304459 1.108409
199203  1.255841 1.111392
199204  1.243667 1.113684
199205  1.286353 1.126754
199206  1.262842 1.131144
199207  1.283566 1.138307", header = TRUE)

我想制作一个包含两个功能的情节.具有多种功能的示例如下图所示:

一个图中的多个功能

我写了以下(删节)代码:

library(ggplot2)
ggplot(data2, aes(Date)) …