使用 coded.data 时,我在 R 中将序列号作为代码获取
I am getting serial numbers as codes in R when using coded.data
以下是我用来重新编码数据的代码:
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()
调用,它将起作用。
编码的优点是可以缩放所有变量,因此在最速上升等方法中得到更公平的对待。如果您只是试图将方程式拟合到数据中,而不打算进行额外的实验来找到最佳值,那么实际上没有必要对数据进行编码。
以下是我用来重新编码数据的代码:
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()
调用,它将起作用。
编码的优点是可以缩放所有变量,因此在最速上升等方法中得到更公平的对待。如果您只是试图将方程式拟合到数据中,而不打算进行额外的实验来找到最佳值,那么实际上没有必要对数据进行编码。