我正在尝试对我的数据集运行boruta功能选择。

代码如下:

df<-read.csv('F:/DataAnalyticsClub/DACaseComp/DatasetDist/Datasets/BestFile.csv',stringsAsFactors=FALSE )
install.packages("Boruta")
library(Boruta)
df[is.na(df)] <- 0
df[df == ""] <- 0
X<-df[ , -which(names(df) %in% c("PREVSALEDATE","PREVSALEDATE2","ClassLabel", "PARID", "PROPERTYUNIT", "PriceDiff1", "PriceDiff2", "DateDiff1", "DateDiff2", "SALEDATE"))]
Y<-df['ClassLabel']



factorCols <- c("SCHOOLDESC","MUNIDESC","SALEDESC","INSTRTYPDESC","NEIGHDESC","TAXDESC","TAXSUBCODE_DESC","OWNERDESC","USEDESC","LOTAREA","CLEANGREEN","FARMSTEADFLAG","ABATEMENTFLAG","COUNTYEXEMPTBLDG","STYLEDESC","EXTFINISH_DESC","ROOFDESC","BASEMENTDESC","GRADEDESC","CONDITIONDESC","CDUDESC","HEATINGCOOLINGDESC","BSMTGARAGE")
nonFactorCols<-c("PRICE","COUNTYTOTAL","LOCALTOTAL","FAIRMARKETTOTAL","STORIES","YEARBLT","TOTALROOMS","BEDROOMS","FULLBATHS","HALFBATHS","FIREPLACES","FINISHEDLIVINGAREA","PREVSALEPRICE","PREVSALEPRICE2")

X[factorCols] <- lapply(X[factorCols], factor)

set.seed(123)
boruta.train<-Boruta(X,Y)


因此,您看到我有一个不同功能的数据集,其中一些是字符串功能,因此我将它们转换为因子。其余为数字。我检验我的假设:
r - R boruta包-(列表)对象不能强制键入“double”-LMLPHP
一旦我运行了Boruta,我就会得到

Error in data.matrix(data.selected) :
  (list) object cannot be coerced to type 'double'


我不知道为什么。我所有的列都是因子或可变数字类型。有什么事吗

仔细搜索之后,我发现有些人建议进行as.matrix()转换,但是在这种情况下:

> boruta.train<-Boruta(as.matrix(X),as.matrix(Y))
Error: Variable none not found. Ranger will EXIT now.
Error in ranger::ranger(data = x, dependent.variable.name = "shadow.Boruta.decision",  :
  User interrupt or internal error.

最佳答案

好吧,在解决这个问题之后,我设法找出了问题所在。 Boruta要求Y(目标)为列表类型,而不是数据框或其他任何类型。

因此,只需像这样创建Y:

Y<-df[,'ClassLabel']


解决问题。

关于r - R boruta包-(列表)对象不能强制键入“double”,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/40823979/

10-12 23:21