Skip to content

Instantly share code, notes, and snippets.

View katwre's full-sized avatar

Katarzyna Wreczycka katwre

View GitHub Profile
@cdesante
cdesante / plottext1.r
Created November 14, 2012 04:57
plottext1
toInstall <- c("ggplot2")
if(doInstall){install.packages(toInstall, repos = "http://cran.r-project.org")}
lapply(toInstall, library, character.only = TRUE)
library(ggplot2)
text.plots <- data.frame(
SUPP = c (rep(c( "Control", "Vitamin C", "Orange Juice" ), each = 1500)) ,
DOSE = rep(rep(c( "I", "II", "III" ), each=500), 3),
LENGTH = c(rnorm(500, 4, 2),
rnorm(500, 7, 1.2),