更改“的值”;预算案;到R中的类别级别
我(现在)有一个问题,我找不到解决办法 背景:Termpaper,主题:使用Kaggle的数据集,从imdb中获取电影数据。相关预算分析->imdb评级和收入->imdb评级 我有可变预算(最小值=11.000,最大值为300.000.000),并希望将其分类为不同级别(低预算/使用此功能:更改“的值”;预算案;到R中的类别级别,r,R,我(现在)有一个问题,我找不到解决办法 背景:Termpaper,主题:使用Kaggle的数据集,从imdb中获取电影数据。相关预算分析->imdb评级和收入->imdb评级 我有可变预算(最小值=11.000,最大值为300.000.000),并希望将其分类为不同级别(低预算/使用此功能: codage <-function(name,ncateg){ bornes <-quantile(name, probs = seq(0,1,by=1/ncateg), na.rm =
codage <-function(name,ncateg){
bornes <-quantile(name, probs = seq(0,1,by=1/ncateg), na.rm =TRUE ,names = TRUE)
Amax <-aggregate(name,list(Nom=cut(name,bornes ,include.lowest=T,label=F)),max)
Amin <-aggregate(name,list(Nom=cut(name,bornes ,include.lowest=T,label=F)),min)
Afreq<-as.matrix(summary(as.factor(cut(na.omit(name),bornes,include.lowest=T,label=F))))
limites <-as.data.frame(cbind(Amin[,1],Amin[,2],Amax[,2],Afreq))
names(limites)<-c("Classe","Mini","Maxi","Effectif")
manques <-length(name)-length(na.omit(name))
varfac <-cut(name,bornes ,include.lowest=T,label=F)
as.factor(varfac)
}
codagecut()
data_op %>%
mutate(level = car::recode(data_op$level,
"1:2500000 = 'Low Budget';
2500001:30000000 = 'Medium Budget';
30000001:199999999 = 'High Budget';
200000000:300000000 = 'Most Expensive Film Budget'",
as.factor.result = TRUE)) -> data_op