man/examples/example_25_unif.R

In fitdistcp: Distribution Fitting with Calibrating Priors for Commonly Used Distributions

#
# example 1
x=fitdistcp::d25unif_example_data_v1
cat("length(x)=",length(x),"\n")
p=c(1:9)/10
q=qunif_cp(x,p)
xmin=min(q$ml_quantiles,q$cp_quantiles);
xmax=max(q$ml_quantiles,q$cp_quantiles);
plot(q$ml_quantiles,p,xlab="quantile estimates",xlim=c(xmin,xmax),
	sub="(from qunif_cp)",
	main="unif: quantile estimates");
points(q$cp_quantiles,p,col="red",lwd=2)