# run a local file
file <- system.file("examples", "stuff.Rmd", package = "gistr")
run(file) %>% gist_create
# run code
run({'
```{r}
x <- letters
(numbers <- runif(8))
```
'}) %>% gist_create
# run a file from a gist, has to get file first
gists('minepublic')[[2]] %>% run() %>% update()
Run the code above in your browser using DataLab