R Mice函数不获取要插补的数据列

当我尝试为数据输入缺失值时，mice函数将不会拾取缺失值的列。我试图替换BusinessTravel中的空值，但使用下面的代码，它不起作用

    library(mice)

    mice_mod <- mice(my_ca_dataset[, !names(my_ca_dataset) %in% 
    c('EmployeeCount', 
'JobInvolvenent', 'NumCompaniesWorked', 'TrainingTimesLastYear')], method = 'rf')

    iter imp variable
1 1
1 2
1 3
1 4
1 5
2 1
2 2
2 3
2 4
2 5
3 1
3 2
3 3
3 4
3 5
4 1
4 2
4 3
4 4
4 5
5 1
5 2
5 3
5 4
5 5
Warning message:
Number of logged events: 4 

mice_output <- complete(mice_mod)
my_ca_dataset$BusinessTravel <- mice_output$BusinessTravel 

sapply(my_ca_dataset, function(x) sum(is.na(x)))


Age Attrition BusinessTravel DailyRate 
0 0 31 0 
Department EmployeeCount EnvironmentSatisfaction Gender 
0 36 0 0 
HourlyRate JobInvolvement JobLevel MonthlyRate 
0 0 0 0 
NumCompaniesWorked Over18 StandardHours StockOptionLevel 
45 0 0 0 
TotalWorkingYears TrainingTimesLastYear YearsAtCompany YearsWithCurrManager 
0 0 0 0

没有显示任何错误，希望这里有人能够提供帮助

下面是数据的简要子集

---

列被存储为字符而不是因子，不允许鼠标正常工作

是否检查了记录的事件？请提供有关您的数据的更多信息，最好是可复制的子集。我已经添加了一些数据子集的屏幕截图。我不确定如何检查记录的事件，我对R和R研究还是很陌生。不幸的是，屏幕截图不是一种可复制的格式。它没有告诉我们数据的列类型。请参阅，您应该执行以下操作：检查鼠标中的内容\u mod$loggedEvents，检查BusinessTravel是否为字符列，。。。你应该多读一些关于老鼠的书，例如，在这里，我能够理解这一点。结果是变量被保存为字符而不是因子，这就是为什么它不允许鼠标工作的原因

 iter imp variable
1 1 BusinessTravel
1 2 BusinessTravel
1 3 BusinessTravel
1 4 BusinessTravel
1 5 BusinessTravel
2 1 BusinessTravel
2 2 BusinessTravel
2 3 BusinessTravel
2 4 BusinessTravel
2 5 BusinessTravel
3 1 BusinessTravel
3 2 BusinessTravel
3 3 BusinessTravel
3 4 BusinessTravel
3 5 BusinessTravel
4 1 BusinessTravel
4 2 BusinessTravel
4 3 BusinessTravel
4 4 BusinessTravel
4 5 BusinessTravel
5 1 BusinessTravel
5 2 BusinessTravel
5 3 BusinessTravel
5 4 BusinessTravel
5 5 BusinessTravel