【发布时间】:2021-07-22 08:46:07
【问题描述】:
box <- read.csv("BlackBoxtrainApril22.csv")
#Change the 2 categorical variables into factors
box$SOUND <- as.factor(box$SOUND)
box$SWITCH <- as.factor(box$SWITCH)
#divide training and testing data
train <- box[1:12000,]
test <- box[12001:18048,]
library(nnet)
require(nnet)
multinom_model <- multinom(SOUND ~ ., data=box)
summary(multinom_model)
下面是dput(head(box)) 的一些输出,看看数据是什么样子的:
structure(list(ID = c(86623L, 57936L, 54301L, 2678L, 65827L, 22420L), INPUT1 = c(30L, 87L, 16L, 64L, 33L, 5L), INPUT2 = c(31L, 76L, 33L, 77L, 72L, 50L), INPUT3 = c(72L, 31L, 87L, 91L, 53L, 26L), INPUT4 = c(29L, 79L, 41L, 59L, 66L, 50L), SWITCH = c("Low", "Low", "Low", "Minimum", "High", "High"), SOUND = c("Gargle", "Tick", "Tick", "Beep", "Beep", "Gargle")), row.names = c(NA, 6L), class = "data.frame")
本质上,我正在尝试使用数字和分类数据的组合来预测分类变量。
这是我的代码。当我做摘要时,我丢失了SWITCH 类别之一和SOUND 类别之一。
我认为这与引用变量有关,但我不确定。
【问题讨论】:
-
欢迎来到 SO,AriMorrison!意识到我们不知道数据中有什么,所以我们根本不可能提供帮助。请通过发布
dput(head(box))的输出来提供数据样本;如果有很多列,那么可能是dput(box[1:10,1:5])或可以很好地代表数据的行和列的某些特定子集。请参阅 stackoverflow.com/q/5963269、minimal reproducible example 和 stackoverflow.com/tags/r/info,了解以可重复方式提问的好例子。 -
谢谢。这是我第一次在 SO 上发帖,所以对此表示歉意。这是 dput(head(box)) 的输出: structure(list(ID = c(86623L, 57936L, 54301L, 2678L, 65827L, 22420L), INPUT1 = c(30L, 87L, 16L, 64L, 33L, 5L), INPUT2 = c(31L, 76L, 33L, 77L, 72L, 50L), INPUT3 = c(72L, 31L, 87L, 91L, 53L, 26L), INPUT4 = c(29L, 79L, 41L, 59L, 66L, 50L) , SWITCH = c("Low", "Low", "Low", "Minimum", "High", "High"), SOUND = c("Gargle", "Tick", "Tick", "Beep", "哔", "漱口")), row.names = c(NA, 6L), class= "data.frame")
-
(请edit把你的问题放在那里,不要在评论中发表。谢谢!)
标签: r regression dummy-variable r-faq