diff --git a/QID-1707-MVACARTBan1/MVACARTBan1.r b/QID-1707-MVACARTBan1/MVACARTBan1.r
index 1947867..948f216 100644
--- a/QID-1707-MVACARTBan1/MVACARTBan1.r
+++ b/QID-1707-MVACARTBan1/MVACARTBan1.r
@@ -4,12 +4,16 @@ rm(list = ls(all = TRUE))
 graphics.off()
 
 # install and load packages
-libraries = c("mvpart")
-lapply(libraries, function(x) if (!(x %in% installed.packages())) {
-  install.packages(x)
-})
-lapply(libraries, library, quietly = TRUE, character.only = TRUE)
+# libraries = c("mvpart")
+# lapply(libraries, function(x) if (!(x %in% installed.packages())) {
+#   install.packages(x)
+# })
+# lapply(libraries, library, quietly = TRUE, character.only = TRUE)
 
+install.packages("devtools")
+devtools::install_github("cran/mvpart")
+library(mvpart)       
+       
 # load data
 x  = read.table("bankruptcy.dat")
 xx = data.frame(x)