在R中我运行ncvTest的异方差性。但我似乎无法将结果打印到csv文件中。这就是我所做的，
ncvt<-ncvTest(pol_reg)
outss<-file(paste0("hetero_test.csv"))
write.csv(ncvt,outss)
我收到以下错误消息，
Error in as.data.frame.default(x[[i]], optional = TRUE, stringsAsFactors = stringsAsFactors) :
cannot coerce class ""chisqTest"" to a data.frame
为了将结果保存到csv文件，我想做什么？ ncvt的结果如下所示，
Non-constant Variance Score Test
Variance formula: ~ fitted.values
Chisquare = 75514.06 Df = 1 p = 0
答案 0 :(得分：2)
您可以提取ncvt列表的组件并从中创建数据帧以写入csv文件：
ncvt<-ncvTest(pol_reg)
ds_ncvt <- data.frame(ncvt$formula.name, ncvt$ChiSquare, ncvt$Df, ncvt$p, ncvt$test)
outss<-file(paste0("hetero_test.csv"))
write.csv(ds_ncvt,outss)
答案 1 :(得分：1)
谢谢，以下内容也有效
ncvt<-ncvTest(pol_reg)
ds_ncvt <- as.matrix(ncvt)
outss<-file(paste0("hetero_test.csv"))
write.csv(ds_ncvt,outss)