另外如何删除xy坐标的字,并在左上角贴一个统一的标签?
- ggplot(data)+
- geom_rect(aes(xmin =data$Time[1], xmax = data$Time[522], ymin = -Inf, ymax = Inf),
- fill = "white", alpha = 0.3)+
- geom_rect(aes(xmin =data$Time[147], xmax = data$Time[189], ymin = -Inf, ymax = Inf),
- fill = "grey", alpha = 0.9)+
- geom_line(aes(x=data$Time,y=data$Equal-weighed MFD index`),col="red")+
- geom_line(aes(x=data$Time,y=data$Value-weighted MFD index`),col="black")


雷达卡





京公网安备 11010802022788号







