Add reactivity tests

This uses the testthat package for running tests.

Assuming that the shiny source is your working directory:

```R
library(devtools)
test()

# Or, if you are in a different directory, you could do something like this:
test("../shiny")
```

Not all of the tests pass yet.