search for: newperc

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

Did you mean: newer
2002 Jun 21
1
naming things in functions
...)[k] = paste( deparse(substitute(datamat)), j, ".", i, sep = "") pL = PercentsMat( sepclusters[[k]], pL, all ) } PercentsMat <- function(clusters, percentsmatrix, ltype){ . . . result = rbind( percentsmatrix, newpercents ) rnames = c(dimnames(percentsmatrix)[[1]], deparse(substitute(clusters))) numrows = length(rnames) numcols = dim(result)[2] } res = matrix(result, nrow = numrows, ncol = numcols, dimnames = list(rnames, NULL)) return(res) } Some actual output of SummaryMat: $p...