# NOT RUN {
data(lossdat)
# }
# NOT RUN {
param<-fitSplicedBestFit(lossdat[[1]], "lnorm", "gpd")
param[[1]] ## Parameters of the body distribution
param[[2]] ## Parameters of the tail distribution
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab