R Graphical Manual

Browse All

Last data update: 2014.03.03

R: Plot a 'CompPlot' of a DiStatis object

CompPlot

R Documentation

Plot a `CompPlot` of a DiStatis object

Description

Plot a CompPlot of a DiStatis object

Usage

## S4 method for signature 'DiStatis'
CompPlot(x,xlabProj=NULL, ylabProj=NULL,
xlabBar="Inertia(%)",ylabBar="Values",mainBar=NULL,mainProj=NULL,
pchPoints=15,legend=TRUE ,colBar="red",colObs="black",barPlot=TRUE,...)

Arguments

`x`	DiStatis class object.
`xlabProj`	character for the x-label title for plot
`ylabProj`	character for the x-label title for plot
`xlabBar`	character for the x-label title for barPlot
`ylabBar`	character for the y-label title for barPlot
`mainBar`	main to histogram plot
`mainProj`	main to proj plot
`pchPoints`	pch for points in plot.
`legend`	Logical. indicates whether the legend prints
`colBar`	character col for bars in the BarPlot
`colObs`	character col for observations in the plot
`barPlot`	logical indicates whether the barPlot is prints
`...`	additional parameters for plot

Value

plotted CompPlot/s of the component/s of the given DiStatis object.

Author(s)

M L Zingaretti, J A Demey-Zambrano, J L Vicente Villardon, J R Demey

Examples

{
## Not run: 
 data(NCI60Selec)
 Z2<-DiStatis(NCI60Selec,Scale=TRUE,Center=TRUE)
 Colores2<-c(rep(colors()[657],5),rep(colors()[637],6),
 rep(colors()[537],7),rep(colors()[552],6),rep(colors()[57],10),
 rep(colors()[300],9),rep(colors()[461],7),rep(colors()[450],2),
 rep(colors()[432],8))
 Colores1<-c(rep("Breast",5),rep("CNS",6),rep("Colon",7),
 rep("Leukemia",6),rep("Melanoma",10),rep("Lung",9),rep("Ovarian",7),
 rep("Prostate",2),rep("Renal",8))
 CompPlot(Z2,xlabBar="",colObs=Colores2,pch=15,las=1,
 cex=2,legend=FALSE,barPlot=FALSE,cex.main=0.6,cex.lab=0.6,
 cex.axis=0.6,las=1)
 legend("topleft",unique(Colores1),col=unique(Colores2),
 bty="n",pch=16,cex=1)

## End(Not run)
}

Results


R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(kimod)
> png(filename="/home/ddbj/snapshot/RGM3/R_BC/result/kimod/DiStatis-CompPlot.Rd_%03d_medium.png", width=480, height=480)
> ### Name: CompPlot
> ### Title: Plot a 'CompPlot' of a DiStatis object
> ### Aliases: CompPlot CompPlot,DiStatis-method
> 
> ### ** Examples
> 
> {
+ ## Not run: 
+ ##D  data(NCI60Selec)
+ ##D  Z2<-DiStatis(NCI60Selec,Scale=TRUE,Center=TRUE)
+ ##D  Colores2<-c(rep(colors()[657],5),rep(colors()[637],6),
+ ##D  rep(colors()[537],7),rep(colors()[552],6),rep(colors()[57],10),
+ ##D  rep(colors()[300],9),rep(colors()[461],7),rep(colors()[450],2),
+ ##D  rep(colors()[432],8))
+ ##D  Colores1<-c(rep("Breast",5),rep("CNS",6),rep("Colon",7),
+ ##D  rep("Leukemia",6),rep("Melanoma",10),rep("Lung",9),rep("Ovarian",7),
+ ##D  rep("Prostate",2),rep("Renal",8))
+ ##D  CompPlot(Z2,xlabBar="",colObs=Colores2,pch=15,las=1,
+ ##D  cex=2,legend=FALSE,barPlot=FALSE,cex.main=0.6,cex.lab=0.6,
+ ##D  cex.axis=0.6,las=1)
+ ##D  legend("topleft",unique(Colores1),col=unique(Colores2),
+ ##D  bty="n",pch=16,cex=1)
+ ## End(Not run)
+ }
NULL
> 
> 
> 
> 
> 
> dev.off()
null device 
          1 
>

Plot a CompPlot of a DiStatis object