search for: selectedcolumns

Displaying 1 result from an estimated 1 matches for "selectedcolumns".

Did you mean: selected_columns
2007 Dec 20
1
custom subset method / handling columns selection as logic in '...' parameter
...else{ if(is.null(listCriteria[critname])) listCriteria[[critname]]<- unique(phenoData[,critname]) retainedCriteria[[critname]] <<- phenoData[,critname] %in% listCriteria[critname] } }) criteriaValues <- do.call("cbind",retainedCriteria) selectedColumns <- rownames(phenoData)[apply(criteriaValues,1,logic)] ## cbind(phenoData,criteriaValues) out <- x[subset,selectedColumns] if (verbose) cat('\n',length(selectedColumns),' columns selected (',paste(selectedColumns,collapse=' '), ')\n',sep=&...