# \donttest{
data(RandomVA3)
test <- RandomVA3[1:200, ]
train <- RandomVA3[201:400, ]
out <- interVA_train(data = test, train = train, causes.train = "cause",
prior = "train", type = "quantile")
# }
Run the code above in your browser using DataLab