Skip to content

Instantly share code, notes, and snippets.

@pachevalier
Created October 29, 2013 16:09
Show Gist options
  • Select an option

  • Save pachevalier/7217622 to your computer and use it in GitHub Desktop.

Select an option

Save pachevalier/7217622 to your computer and use it in GitHub Desktop.
Fake Line PLot
N <- 100
fk <- data.frame(id = 1:N)
fk$x <- 1 + rnorm(N)
fk$y1 <- 1 + fk$x + rnorm(N)
fk$y2 <- 2 + fk$x + rnorm(N)
ggplot(data = fk, aes(x = x, y = y1)) +
geom_line(color = "#339966", size = 2) +
geom_line(aes(y = y2), color = "#990000", size = 2) +
theme_tufte()
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment