- feat: Print column roles space, time or plot in Task (#198)

print column roles `space`, `time` or `plot` in Task
mlr-org · Jun 8, 2022 · 75d4849 · 75d4849
1 parent 3193af9
commit 75d4849
Showing 1 changed file with 10 additions and 0 deletions.
diff --git a/R/TaskRegrST.R b/R/TaskRegrST.R
@@ -101,6 +101,16 @@ TaskRegrST = R6::R6Class("TaskRegrST",
       super$print(...)
       cat("* Coordinates:\n")
       print(self$coordinates())
+      if (length(self$col_roles$time) && length(self$col_roles$space)) {
+        cat("* Column roles:\n- Time:", self$col_roles$time,
+          "\n- Space:", self$col_roles$space, "\n")
+      } else if (length(self$col_roles$time)) {
+        cat("* Column roles:\n- Time:", self$col_roles$time, "\n")
+      } else if (length(self$col_roles$space)) {
+        cat("* Column roles:\n- Space:", self$col_roles$space, "\n")
+      } else if (length(self$col_roles$plot)) {
+        cat("* Column roles:\n- Plot:", self$col_roles$plot, "\n")
+      }
     },
 
     #' @field extra_args (named `list()`)\cr