reportChromosomesSmoothCopyNumber(snpdata, grouping, normalizedTo=2, smooth.lambda=2, ridge.kappa=0, plotLOH=c("none", "marker", "line", "NorTum"), sample.colors = NULL, ideo.bleach=0.25, ...)
reportSamplesSmoothCopyNumber(snpdata, grouping, normalizedTo=2, smooth.lambda=2, ridge.kappa=0, plotLOH=c("none", "marker", "line", "NorTum"), sample.colors=NULL, ...)
reportGenomeGainLossLOH(snpdata, grouping, plotSampleNames=FALSE, sizeSampleNames=4, distance.min, upcolor="red", downcolor="blue", lohcolor="grey", hetcolor="lightgrey", lohwidth=1, segment=101, orientation=c("V","H"), ...)
reportChromosomeGainLossLOH(snpdata, grouping, plotSampleNames=FALSE, distance.min, upcolor="red", downcolor="blue", lohcolor="grey", hetcolor="lightgrey", proportion=0.2, plotLOH=TRUE, segment=101, ...)
reportGenomeIntensityPlot(snpdata, normalizedTo=NULL, subsample=NULL, smoothing=c("mean", "quant"), dot.col="black", smooth.col="red", ...)quantsmooth.quantsmooth.plot or getChangedRegions.pdf or functions that
create picture files like jpg, png, bmp.
quantsmooth,prepareGenomePlot,
pdfChromosomesSmoothCopyNumber, pdfSamplesSmoothCopyNumber
data(chr17.260)
chr17nrm <- standardNormalization(chr17.260)
par(mfrow = c(4,2), mar = c(2,4,2,1))
reportChromosomesSmoothCopyNumber(chr17nrm, grouping=pData(chr17.260)$Group,smooth.lambda = 4)
Run the code above in your browser using DataLab