Further shorten examples before uploading to CRAN

Author: OlaPaluszynska

DESCRIPTION

@@ -26,4 +26,4 @@ Suggests:
   knitr
 VignetteBuilder: knitr
 RoxygenNote: 6.0.1
-URL: https://github.com/geneticsMiNIng/BlackBoxOpener/randomForestExplainer
+URL: https://github.com/MI2DataLab/randomForestExplainer

R/measure_importance.R

@@ -87,7 +87,7 @@ measure_p_value <- function(importance_frame){
 #' @importFrom data.table rbindlist
 #'
 #' @examples
-#' forest <- randomForest::randomForest(Species ~ ., data = iris, localImp = TRUE)
+#' forest <- randomForest::randomForest(Species ~ ., data = iris, localImp = TRUE, ntree = 300)
 #' measure_importance(forest)
 #'
 #' @export
@@ -285,8 +285,9 @@ plot_multi_way_importance <- function(importance_frame, x_measure = "mean_min_de
 #' @import GGally
 #'
 #' @examples
-#' forest <- randomForest::randomForest(Species ~ ., data = iris, localImp = TRUE)
-#' plot_importance_ggpairs(measure_importance(forest), measures = c("mean_min_depth", "times_a_root"))
+#' forest <- randomForest::randomForest(Species ~ ., data = iris, localImp = TRUE, ntree = 200)
+#' frame <- measure_importance(forest, measures = c("mean_min_depth", "times_a_root"))
+#' plot_importance_ggpairs(frame, measures = c("mean_min_depth", "times_a_root"))
 #'
 #' @export
 plot_importance_ggpairs <- function(importance_frame, measures =
@@ -319,8 +320,9 @@ plot_importance_ggpairs <- function(importance_frame, measures =
 #' @import GGally
 #'
 #' @examples
-#' forest <- randomForest::randomForest(Species ~ ., data = iris, localImp = TRUE)
-#' plot_importance_ggpairs(measure_importance(forest), measures = c("mean_min_depth", "times_a_root"))
+#' forest <- randomForest::randomForest(Species ~ ., data = iris, localImp = TRUE, ntree = 300)
+#' frame <- measure_importance(forest, measures = c("mean_min_depth", "times_a_root"))
+#' plot_importance_ggpairs(frame, measures = c("mean_min_depth", "times_a_root"))
 #'
 #' @export
 plot_importance_rankings <- function(importance_frame, measures =

R/min_depth_distribution.R

@@ -99,7 +99,7 @@ get_min_depth_means <- function(min_depth_frame, min_depth_count_list, mean_samp
 #' @import dplyr
 #'
 #' @examples
-#' forest <- randomForest::randomForest(Species ~ ., data = iris)
+#' forest <- randomForest::randomForest(Species ~ ., data = iris, ntree = 300)
 #' plot_min_depth_distribution(min_depth_distribution(forest))
 #'
 #' @export