View source: R/Combined_Performance.R
Combined_Performance | R Documentation |
Combined Performance of the Data Splits
Combined_Performance(Sub.Est.Mdls)
Sub.Est.Mdls |
is the total perfomance of exog. |
The output from Combined_Performance
.
sample_data <- sample_data[c(1:750),] yvar <- c("Loan.Type") xvar <- c("sex", "married", "age", "havejob", "educ", "political.afl", "rural", "region", "fin.intermdiaries", "fin.knowldge", "income") CCP.RF <- Estimate_Models(sample_data, yvar, xvec = xvar, exog = "political.afl", xadd = c("networth", "networth_homequity", "liquid.assets"), type = "RF", dnames = c("0","1")) Sub.CCP.RF <- list (Mdl.1 = CCP.RF$EstMdl$`D.1+networth`, Mdl.0 = CCP.RF$EstMdl$`D.0+networth`) CCP.NoCCP.RF <- Combined_Performance (Sub.CCP.RF)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.