Last active
August 29, 2015 13:58
-
-
Save news1537/9967175 to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| yrBuilt id | |
| 1852 399822 | |
| 1853 276437 | |
| 1854 116921 | |
| 1854 130112 | |
| 1854 267325 | |
| 1854 349190 | |
| 1854 349993 | |
| 1854 376716 | |
| 1854 378588 | |
| 1854 379720 | |
| 1854 389546 | |
| 1854 402452 | |
| 1854 503248 | |
| 1854 786797 | |
| 1854 877060 | |
| 1855 278448 | |
| 1855 734824 | |
| 1856 379956 | |
| 1856 394772 | |
| 1856 416706 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(ggplot2) | |
| library(grid) | |
| a <- read.table(file = "IdYrBuilt.tab", header= TRUE, sep="\t") | |
| ggplot(a, aes(factor(yrBuilt))) + geom_histogram(binwidth=3, colour="red", fill="gray")+scale_x_discrete(breaks=seq(min(a$yrBuilt), max(a$yrBuilt), by=4)) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment