author | Don Pellegrino <don@drexel.edu> | 2010-01-16 19:21:19 (GMT) |
---|---|---|
committer | Don Pellegrino <don@drexel.edu> | 2010-01-16 19:21:19 (GMT) |
commit | e8dbfca0fcc7a8925e720c6831131d7bb71847a3 (patch) (side-by-side diff) | |
tree | 5b84c2dbfb059193eddfdff9bdf12784082ced5e | |
parent | 1501b0b828fab86848cbfc242925964685da3e83 (diff) | |
download | exp007-e8dbfca0fcc7a8925e720c6831131d7bb71847a3.zip exp007-e8dbfca0fcc7a8925e720c6831131d7bb71847a3.tar.gz exp007-e8dbfca0fcc7a8925e720c6831131d7bb71847a3.tar.bz2 |
R worksheet to explore the data from the HDF5 file.
-rw-r--r-- | analysis/year.R | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/analysis/year.R b/analysis/year.R new file mode 100644 index 0000000..85d3da1 --- a/dev/null +++ b/analysis/year.R @@ -0,0 +1,19 @@ +# Explore the qualities of the year feature. + +require(hdf5); + +hdf5load("/home/don/exp007/src/influenza.h5", tidy = TRUE); + +d <- influenza.aa.dat; + +# All records for 1918. Based on code from +# http://wiki.r-project.org/rwiki/doku.php?id=tips:data-frames:select_observations +p1918 <- d[d$Year == 1918, ] + +# Countries represented in the 1918 dataset. +p1918$Country; + +# All record with a year value. +years <- d[d$Year != 0, ]; + +hist(years$Year); |