Ok, I see, economics dataset comes with ggplot2 (you forgot the library call to ggplot2)
library(ggplot2)
library(tis)
ggp <- ggplot(aes(x=date, y=100*unemploy/pop), data=economics)
nberShade(ggp) + xlim(as.Date("1967-01-01"), Sys.Date()) +
opts(legend.position="none") + geom_line() + theme_bw()
#> Error: Summary operations are not defined for quosures.
#> Do you need to unquote the quosure?
#>
#> # Bad:
#> range(myquosure)
#>
#> # Good:
#> range(!!myquosure)
Sadly tis is no longer compatible with the current version of ggplot2 because it doesn't makes correct use of tidy evaluation, and aparently is no longer under active development and doesn't has an issues page.
This is the mirror repository on github https://github.com/cran/tis, you could fork it and try to fix it to make it work with the latest ggplot2 version.