Adding an invert argument to negate the filter

so that we can do something like: 

```
test_dir( "tests/testthat", filter = "sql", invert = TRUE )
```