setparam: Set parameters to make plots.

In machalen/QualityGraphs: Make quality graphs for microarray data based on objects obtained witharoma affymetrix normalization.

Usage

setparam(labels)

Arguments

labels

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (labels) 
{
    long <- length(labels)
    wid <- 3500
    hei <- 3500
    res <- 400
    if (max(nchar(labels)) < 10) {
        ce <- 0.8
    }
    else if (max(nchar(labels)) < 15) {
        ce <- 0.6
    }
    else {
        ce <- 0.4
    }
    if (long < 35) {
        if (max(nchar(labels)) < 10) {
            ce <- 0.8
        }
        else if (max(nchar(labels)) < 15) {
            ce <- 0.6
        }
        else {
            ce <- 0.4
        }
    }
    else if (long < 90) {
        ce <- 0.4
    }
    else if (long < 140) {
        ce <- 0.3
    }
    else {
        ce <- 0.2
    }
    return(list(wid = wid, hei = hei, res = res, ce = ce))
  }

machalen/QualityGraphs documentation built on Oct. 22, 2019, 8:29 p.m.