library(mlr3)
library(mlr3pipelines)

mlr_reflections = utils::getFromNamespace("mlr_reflections", ns = "mlr3")
mlr_reflections$task_col_roles$classif = union(mlr_reflections$task_col_roles$classif, "another")
task = tsk("penguins")
task$col_roles$another = "island"
print(task$col_roles)
#> $feature
#> [1] "bill_depth"     "bill_length"    "body_mass"      "flipper_length"
#> [5] "island"         "sex"            "year"          
#> 
#> $target
#> [1] "species"
#> 
#> $name
#> character(0)
#> 
#> $order
#> character(0)
#> 
#> $stratum
#> character(0)
#> 
#> $group
#> character(0)
#> 
#> $weight
#> character(0)
#> 
#> $another
#> [1] "island"
graph = ppl("convert_types", "integer", "numeric")
task = graph$train(task)[[1L]]
print(task$col_roles)
#> $feature
#> [1] "body_mass"      "flipper_length" "year"           "bill_depth"    
#> [5] "bill_length"    "island"         "sex"           
#> 
#> $target
#> [1] "species"
#> 
#> $name
#> character(0)
#> 
#> $order
#> character(0)
#> 
#> $stratum
#> character(0)
#> 
#> $group
#> character(0)
#> 
#> $weight
#> character(0)
#> 
#> $another
#> character(0)