Populate .generate_vimp_tasks skeleton

R/TaskMain.R

@@ -58,7 +58,12 @@ setMethod(
 }
 
 
-.generate_vimp_tasks <- function() {
+.generate_vimp_tasks <- function(
+    file_paths,
+    project_id
+) {
+
+  task_list <- list()
 
   # Check if vimp should be computed separately or is computed during 
   # hyperparameter optimisation.
@@ -79,8 +84,19 @@ setMethod(
     }
   }
 
+  # Check if any vimp-related tasks are required.
+  if (len(task_list) == 0L) return(NULL)
+
   # Add tasks related to data processing for vimp methods.
+  task_list <- c(
+    task_list, 
+    .generate_vimp_data_preprocessing_tasks(
+      file_paths = file_paths,
+      project_id = project_id
+    )
+  )
 
+  return(task_list)
 }