plot.GPA | R Documentation |
Plots the group configuration of a Generalised Procrustes Analysis
## S3 method for class 'GPA'
plot(x, pch = NA, pos = NULL, col = "black", bg = "white", cex = 1, ...)
x |
an object of class |
pch |
plot symbol |
pos |
position of the sample labels relative to the plot symbols if pch != NA |
col |
plot colour (may be a vector) |
bg |
background colour (may be a vector) |
cex |
relative size of plot symbols |
... |
optional arguments to the generic |
procrustes
data(Namib)
GPA <- procrustes(Namib$DZ,Namib$HM)
coast <- c('N1','N2','N3','N10','N11','N12','T8','T13')
snames <- names(Namib$DZ)
bgcol <- rep('yellow',length(snames))
bgcol[which(snames %in% coast)] <- 'red'
plot(GPA,pch=21,bg=bgcol)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.