This function generates a simple biplot out of various source and allows to color the objects individually. (Warning: This preliminary version is likely to be changed in next edition)

1 2 3 4 5 6 7 8 9 10 11 12 | ```
## Default S3 method:
coloredBiplot(x, y, var.axes = TRUE, col,
cex = rep(par("cex"), 2), xlabs = NULL, ylabs = NULL, expand=1,
xlim = NULL, ylim = NULL, arrow.len = 0.1, main = NULL, sub = NULL,
xlab = NULL, ylab = NULL, xlabs.col = NULL, xlabs.pc=NULL, ...)
## S3 method for class 'princomp'
coloredBiplot(x, choices = 1:2, scale = 1,
pc.biplot=FALSE, ...)
## S3 method for class 'prcomp'
coloredBiplot(x, choices = 1:2, scale = 1,
pc.biplot=FALSE, ...)
``` |

`x` |
a representation of the the co-information to be plotted, given by a result of princomp or prcomp; or the first set of coordinates to be plotted |

`y` |
optional, the second set of coordinates to be potted |

`var.axes` |
If 'TRUE# the second set of points have arrows representing them as (unscaled) axes. |

`col` |
One color (to be used for the y set) or a vector of two colors (to be used for x and y sets respectively, if xlabs.col is NULL) |

`cex` |
the usual cex parameter for plotting; can be a length-2 vector to format differently x and y labels/symbols. |

`xlabs` |
The names to write for the points of the first set |

`ylabs` |
The names to write for the points of the second set |

`expand` |
An expansion factor to apply when plotting the second set of points relative to the first. This can be used to tweak the scaling of the two sets to a physically comparable scale. |

`xlim` |
horizontal axis limits |

`ylim` |
vertical axis limits |

`arrow.len` |
The length of the arrow heads on the axes plotted in 'var.axes' is true. The arrow head can be suppressed by 'arrow.len=0'. |

`main` |
main title |

`sub` |
subtitle |

`xlab` |
horizontal axis title |

`ylab` |
vertical axis title |

`xlabs.col` |
The color(s) to draw the points of the first set |

`xlabs.pc` |
the plotting character(s) for the first set |

`scale` |
the way to distribute the singular values on the
right or left singular vectors for princomp and prcomp objects
(see |

`choices` |
the components to be plotted (see |

`pc.biplot` |
should be scaled by |

`...` |
further parameters for plot |

The functions is provided for convenience.

The function is called only for the side effect of plotting. It is a modification of the standard R routine 'biplot'.

Raimon Tolosana-Delgado, K.Gerald v.d. Boogaart http://www.stat.boogaart.de

1 2 3 | ```
data(SimulatedAmounts)
coloredBiplot(x=princomp(acomp(sa.outliers5)),pc.biplot=FALSE,
xlabs.pc=c(1,2,3), xlabs.col=2:4, col="black")
``` |

Questions? Problems? Suggestions? Tweet to @rdrrHQ or email at ian@mutexlabs.com.

Please suggest features or report bugs with the GitHub issue tracker.

All documentation is copyright its authors; we didn't write any of that.