我尝试了几种方法来设置情节。我认为主要的问题是，子位置在x轴标签所在的位置。我尝试使用xaxt =“ n”来防止RStudio绘制x轴，但是结果仍然相同。
对于其他图形参数（例如mgp和oma），我试图设置子区域的位置，但也使用负位置代码来设置子区域，使其更靠近图的中心。此外，outer = TRUE时，该子甚至不再显示。
我认为我对有关该主题的大量信息感到有些困惑，并且会为一些匹配的建议感到高兴。
这是我到目前为止生成的代码，它最能描述我的问题：
library(xts)
library(zoo)
library(timeSeries)
library(varhandle)
library(quantmod)
library(tseries)
library(DescTools)
library(Hmisc)
library(graphics)
setwd("D:/Documents/Dokumente/Universität/HSU-HH/12. Trimester/Daten/finish")
#Wechselkurs
Sd<-read.csv("S.csv",header=TRUE,sep=";",dec=",",na.strings="#NV")
Sd$Date<-as.POSIXct(Sd$Date,format="%d.%m.%Y")
Sd<-xts(Sd[,2],order.by=Sd$Date,frequency=12)#soweit richtig![Streiche nach
na.strings!]
S<-apply.monthly(Sd,mean,na.rm=TRUE)#na.rm unbedingt, da ansonsten ganzer Monat entfällt!!!
S<-convertIndex(S,value="yearmon")
plot.xts(S,y =NULL,type="l",col="black",major.ticks="year",grid.ticks.on="year",lwd=2,main="")
par(adj=0)
title(ylab="",main="USD-CAD")
par(adj=0.5)
title(sub="Monatsdurchschnitte, Quelle: Bloomberg, Commerzbank Research")#plotbereich festlegen!?!
这是我得到的情节： sub fail
谢谢您的帮助！
