Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

R File fixes

  • Loading branch information...
commit ad0700d56bb6d410ae205c20a9ca4999da68a4ed 1 parent e21fa8a
Christopher Rackauckas authored
Showing with 2 additions and 4 deletions.
  1. +2 −4 Hybrid/ensembles.R
View
6 Hybrid/ensembles.R
@@ -69,7 +69,6 @@ if(model.type=="BRT"){
if(model.type=="BMAR"){
library(BMA)
- library(ipred)
## Bayesian Model Averaging Regression
y = dataTrain$y
drops = c("y")
@@ -85,7 +84,6 @@ if(model.type=="BMAR"){
if(model.type=="RFR"){
library(randomForest)
- library(ipred)
## Random Forest
fit = randomForest(y ~0+., data=dataTrain,importance=TRUE, ntree=100)
CVPredictions = predict(fit,dataCV)
@@ -94,10 +92,10 @@ if(model.type=="RFR"){
if(model.type=="CIRF"){
## Conditional Inference Random Forest
- ## Not Working
library(party)
- library(languageR)
fit <- cforest(y ~ 0 + ., data = dataTrain)
+ CVPredictions = predict(fit,dataCV)
+ TestPredictions= predict(fit,dataTest)
}
if(model.type=="GBRT"){
Please sign in to comment.
Something went wrong with that request. Please try again.