-
Notifications
You must be signed in to change notification settings - Fork 31
Open
Labels
Description
In dataset.R
Instead
# Remove data from dataset if necessary
# TODO better name?
postProcessDataSet <- function(dataSet = get("dataSet", envir = parent.frame()),
darch = get("darch", envir = parent.frame()))
{
if (!getParameter(".retainData", F))
{
dataSet@data <- NULL
dataSet@targets <- NULL
}
dataSet
}
I offer:
# Remove data from dataset if necessary
# TODO better name?
postProcessDataSet <- function(dataSet = get("dataSet", envir = parent.frame()),
darch = get("darch", envir = parent.frame()))
{
if (!getParameter(".retainData", F))
{
dataSet@data <- NULL
dataSet@targets <- NULL
dataSet@parameters<-list();
}
dataSet
}
dataSet@parameters<-list(); - will clear educate data|matrix. With this i lose file from 2 mB to 50 kB.
But I'm not sure, maybe these data are needed somewhere?
Reactions are currently unavailable