# NOT RUN {
options("warn" = -1);
# get data directory
data.directory <- get.program.defaults(networks.database = "test")[["test.data.dir"]];
# initialise params
output.directory <- tempdir();
data.types <- c("mRNA");
feature.selection.datasets <- c("Breastdata1");
feature.selection.p.thresholds <- c(0.05);
# estimate network coefficients for all the subnet features
derive.network.features(
data.directory = data.directory,
output.directory = output.directory,
data.types = data.types,
feature.selection.fun = "calculate.network.coefficients",
feature.selection.datasets = feature.selection.datasets,
feature.selection.p.thresholds = feature.selection.p.thresholds,
networks.database = "test"
);
# }
Run the code above in your browser using DataLab