data(spatial)
## default color code: log-ratios
## Not run:
# genome.plot(edge.norm, chrLim="LimitChr")
# ## End(Not run)
## color code determined by a qualitative variable: ZoneGNL (DNA copy number code)
edge.norm$cloneValues$ZoneGNL <- as.factor(edge.norm$cloneValues$ZoneGNL)
## Not run:
# genome.plot(edge.norm, col.var="ZoneGNL")
# ## End(Not run)
## comparing profiles with and without normalization
## aggregate data without normalization (flags)
gradient.nonorm <- norm(gradient, flag.list=NULL, var="LogRatio",
FUN=median, na.rm=TRUE)
gradient.nonorm <- sort(gradient.nonorm)
## Not run:
# genome.plot(gradient.nonorm, pch=20, main="Genomic profile without
# normalization", chrLim="LimitChr")
# x11()
# genome.plot(gradient.norm, pch=20, main="Genomic profile with
# normalization", chrLim="LimitChr")
# ## End(Not run)
Run the code above in your browser using DataLab