I am trying to make a bar graph where the largest bar would be nearest to the y axis and the shortest bar would be furthest. So this is kind of like the Table I have Name Position 1 James Goalkeeper 2 Frank Goalkeeper 3 Jean Defense 4 Steve Defense 5 John Defense 6 Tim … Read more
I plot the following: library(ggplot2) carrots <- data.frame(length = rnorm(500000, 10000, 10000)) cukes <- data.frame(length = rnorm(50000, 10000, 20000)) carrots$veg <- ‘carrot’ cukes$veg <- ‘cuke’ vegLengths <- rbind(carrots, cukes) ggplot(vegLengths, aes(length, fill = veg)) + geom_density(alpha = 0.2) Now say, I only want to plot the region between x=-5000 to 5000, instead of the entire … Read more
I would like to place two plots side by side using the ggplot2 package, i.e. do the equivalent of par(mfrow=c(1,2)). For example, I would like to have the following two plots show side-by-side with the same scale. x <- rnorm(100) eps <- rnorm(100,0,.2) qplot(x,3*x+eps) qplot(x,2*x+eps) Do I need to put them in the same data.frame? … Read more
I have the following plot like below. It was created with this command: library(ggplot2) df <- data.frame(cond = factor(rep(c(“A”, “B”), each = 200)), rating = c(rnorm(200), rnorm(200, mean=.8))) ggplot(df, aes(x=rating, fill=cond)) + geom_density(alpha = .3) + xlab(“NEW RATING TITLE”) + ylab(“NEW DENSITY TITLE”) Now, I want to modify the legend title from cond into NEW … Read more
I would like to plot y1 and y2 in the same plot. x <- seq(-2, 2, 0.05) y1 <- pnorm(x) y2 <- pnorm(x, 1, 1) plot(x, y1, type = “l”, col = “red”) plot(x, y2, type = “l”, col = “green”) But when I do it like this, they are not plotted in the same … Read more
Apparently, folk have figured out how to make xkcd style graphs in Mathematica and in LaTeX. Can we do it in R? Ggplot2-ers? A geom_xkcd and/or theme_xkcd? I guess in base graphics, par(xkcd=TRUE)? How do I do it? As a first stab (and as much more elegantly shown below) in ggplot2, adding the jitter argument … Read more
I have a plot where the x-axis is a factor whose labels are long. While probably not an ideal visualization, for now I’d like to simply rotate these labels to be vertical. I’ve figured this part out with the code below, but as you can see, the labels aren’t totally visible. data(diamonds) diamonds$cut <- paste(“Super … Read more
