swh:1:snp:16c54c84bc54885e783d4424d714e5cc82f479a1
Tip revision: db8668b63745f624236e566437c198010990b082 authored by Roger Koenker on 02 May 2022, 16:42:02 UTC
version 5.93
version 5.93
Tip revision: db8668b
run-demos.R
library(quantreg)
(dDIR <- system.file("demo", package = "quantreg"))
set.seed(1) # since some demos randomly generate
cat("Running demos from package 'quantreg' : \n\n")
for(ff in list.files(dDIR, pattern="\\.R$", full.names = TRUE)) {
f <- basename(ff)
cat("\n", f," :\n", paste(rep.int("-", nchar(f)), collapse=''),
"\n", sep='')
source(ff, echo = TRUE)
}