以下是我用来重新编码数据的代码:
results$Taxis<-as.factor(results$Taxis)
results$ShiftType<-as.factor(results$ShiftType)
results$Sharing<-as.factor(results$Sharing)
results$Mode<-as.factor(results$Mode)
plot(results)
anova<-aov(Service.Level~Taxis+ShiftType+Sharing+Mode,data = results)
summary(anova)
results.coded<-coded.data(results,x1~(Taxis-4500)/3000,x3~(Sharing-50)/50,x4~(Mode-0.5)/0.5)
results.coded
它给了我序列号作为代码(1,2,3,4,5..(如果我更改公式,这些代码不会更改。他们保持原样。看起来像一些默认编码。请帮帮我!
数据编码与连续预测变量一起使用,而不是因子。如果解释要求这些预测因子是因子,请不要尝试对它们进行编码。如果它们是在数字尺度上,并且您想这样解释它们,那么您可以对它们进行编码。拿走那些as.factor()
电话,它就会起作用。
编码的优点是缩放所有变量,因此在最陡峭的上升等方法中得到更公平的处理。如果您只是尝试将方程拟合到数据中,并且不打算进行其他实验来找到最佳值,则实际上没有必要对数据进行编码。