Skip to content

Instantly share code, notes, and snippets.

@rcquan
Created November 22, 2014 06:59
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save rcquan/b8b4f9cf58b6343f648b to your computer and use it in GitHub Desktop.
Save rcquan/b8b4f9cf58b6343f648b to your computer and use it in GitHub Desktop.
# Time-series plot
library(ggplot2)
library(scales)
# By month
m = ggplot(data = medMis_month, aes(x = Time, y = Freq)) + geom_line()
m = m + scale_x_datetime(labels = date_format("%Y"), breaks = date_breaks("2 years"))
m = m + ylab("No. of Physicians Disciplined") +
ggtitle("Physicians Disciplined by NYS DOH from 1990-2013")
m
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment