Я подгоняю данные с помощью традиционных распределений.Я использую qqcomp для построения своих подогнанных распределений в qqplot.Я хочу добавить к этому сюжету также данные qqplot.
Я уже пытался добавить их обычным способом ggplot (), получив + сообщение:
q + p Ошибка: не знаю, как добавить p в график
Скажем:
library(ggplot2)
library(fitdistrplus)
z=rnorm(1000,5,1)+runif(1000,1,2)
fit.w=fitdist(z, "weibull")
fit.ln=fitdist(z, "lnorm")
fit.gam=fitdist(z,"gamma")
fitsc=list(fit.w, fit.ln,fit.gam)
###Comparison of fitted distributions
q=qqcomp (fitsc, legendtext = plot.legend,plotstyle = "ggplot")
print(q)
###QQplot of the data
z=dataframe(z)
p=ggplot(z,aes(sample=z))+stat_qq()
print(p)
Я хочу объединить графики q и p в одно.Я знаю, что qqcomp with plotstyle = "ggplot" создает объект ggplot, поэтому я думаю, что есть способ объединить эти два графика.Спасибо за вашу помощь.