Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Year Total Lobby
- 1998 145 10404
- 1999 144 12924
- 2000 157 12543
- 2001 163 11851
- 2002 183 12149
- 2003 206 12959
- 2004 218 13201
- 2005 244 14098
- 2006 263 14493
- 2007 287 14826
- 2008 331 14140
- p <- ggplot(df, aes(x = year))
- p <- p + geom_bar(aes(y = lobby), stat = "identity")
- p <- p + geom_point(aes(y = total)) +
- geom_line(aes(y = total))
- p <- p + scale_y_continuous(sec.axis = sec_axis(~.???))
- p
Add Comment
Please, Sign In to add comment