Как предсказать вероятность каждого класса, используя наивный байес? - PullRequest
0 голосов
/ 28 января 2019

Мой вопрос о теории Байса.Я хочу предсказать вероятность каждого класса наивными байесами.В моем случае класс равен трем (ДА, НЕТ, НЕИЗВЕСТНО), а предыдущая вероятность почти одинакова (0,33,0.33.0.34).Однако Данные не включают в себя один класс (НЕИЗВЕСТНО).Могу ли я получить апостериорную вероятность с помощью наивных байесов?Я не знаю, неверно ли мое мышление или неправильный код.Пожалуйста, научите меня.

Это мой пример кода.

library(e1071)
library(naivebayes)

random<-floor(abs(rnorm(1000,mean=0,sd=50)))%%2+1
class<-c('YES','NO','UNKNOWN')
random<-class[random]
randmat<-as.data.frame(matrix(rnorm(4000,mean=0,sd=1),nrow=1000))
dataset<-cbind(randmat,random)
dataset$random<-factor(dataset$random,levels=c(levels(dataset$random),'UNKNOWN'))
Naive_Bayes_Model<-naive_bayes(random~., data=dataset,prior=c(0.33,0.33,0.34))
NB_Predictions<-predict(Naive_Bayes_Model,dataset,type='prob')

head(NB_Predictions)
...