generic.bagging: This function runs boostrap aggregating for a given training...

In PivotalR: A Fast, Easy-to-Use Tool for Manipulating Tables in Databases and a Wrapper of MADlib

Description

A generic function to do boostrap aggregating for a given machine learning model. The user might need to write a wrapper for the training function so that they could satisfy the format requirements desceribed in the following.

Usage

generic.bagging(train, data, nbags = 10, fraction = 1)

Arguments

train	A training function. It must have only one argument data. Given the data, it produces the model.
data	A db.obj object, which wraps the data in the database.
nbags	An integer, default is 10. The number of bagging sampling.
fraction	A double, default is 1. The fraction of data in each bagging sample.

Value

A bagging.model object, which is actually a list of fitted models.

Author(s)

Author: Predictive Analytics Team at Pivotal Inc.

Maintainer: Frank McQuillan, Pivotal Inc. [e-mail]

References

[1] Wiki: bagging https://en.wikipedia.org/wiki/Bootstrap_aggregating

See Also

predict.bagging.model makes predictions using the result of this function.

generic.cv for cross-validation

sample,db.obj-method samples data from a table

Examples

## Not run: 


## set up the database connection
## Assume that .port is port number and .dbname is the database name
cid <- db.connect(port = .port, dbname = .dbname, verbose = FALSE)

delete("abalone", conn.id = cid)
as.db.data.frame(abalone, "abalone", conn.id = cid, verbose = FALSE)
y <- db.data.frame("abalone", conn.id = cid)

fit <- generic.bagging(function(data) {
                           madlib.lm(rings ~ . - id - sex, data = data)
                       }, data = y, nbags = 25, fraction = 0.7)

pred <- predict(fit, newdata = y) # make prediction

lookat(mean((y$rings - pred)^2)) # mean squared error

db.disconnect(cid, verbose = FALSE)

## End(Not run)

PivotalR documentation built on March 13, 2021, 1:06 a.m.