Attention: the list was moved to
https://github.com/dypsilon/frontend-dev-bookmarks
This page is not maintained anymore, please update your bookmarks.
vioplot2 <- function (x, ..., range = 1.5, h = NULL, ylim = NULL, names = NULL, | |
horizontal = FALSE, col = "magenta", border = "black", lty = 1, | |
lwd = 1, rectCol = "black", colMed = "white", pchMed = 19, | |
at, add = FALSE, wex = 1, drawRect = TRUE, side="both") | |
{ | |
datas <- list(x, ...) | |
n <- length(datas) | |
if (missing(at)) | |
at <- 1:n | |
upper <- vector(mode = "numeric", length = n) |
Attention: the list was moved to
https://github.com/dypsilon/frontend-dev-bookmarks
This page is not maintained anymore, please update your bookmarks.