Description Usage Arguments Value Author(s) Examples
Plot a TrajPlot
of a DiStatis object
1 2 3 4 |
x |
DiStatis class object. |
xlabT |
character for the x-label title for plot |
ylabT |
character for the y-label title for plot |
mainTraj |
the main proj plot |
legend |
Logical. Indicates whether the legend prints |
xlimi |
vector bounds to x-axes. |
ylimi |
vector bounds to y-axes. |
panel |
logical if is true, the trajectories are plotted in panel-plot |
colours |
for plot |
... |
additional parameters for plot |
plotted Trajectories Plot of the given DiStatis object.
M L Zingaretti, J A Demey-Zambrano, J L Vicente Villardon, J R Demey
1 2 3 4 5 6 7 8 9 10 11 12 13 | {
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],8),rep(colors()[461],7),rep(colors()[450],2)
,rep(colors()[432],7))
Colores1<-c(rep("Breast",5),rep("CNS",6),rep("Colon",7)
,rep("Leukemia",6),rep("Melanoma",10),rep("Lung",8),rep("Ovarian",7)
,rep("Prostate",2),rep("Renal",7))
TrajPlot(Z2,xlabT = "",ylabT="",colours=Colores2,legend=FALSE)
legend("topleft",unique(Colores1),col=unique(Colores2),bty="n",pch=16,cex=1)
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.