Convert chunk and re-render readme

Author: shikokuchuo

README.Rmd

@@ -4,7 +4,8 @@ output: github_document
 
 <!-- README.md is generated from README.Rmd. Please edit that file -->
 
-```{r, include = FALSE}
+```{r}
+#| include: false
 knitr::opts_chunk$set(
   collapse = TRUE,
   comment = "#>",
@@ -63,7 +64,8 @@ Set the `callback` argument to run an R function, or rlang-style formula, every
 - Uses the 'later' package to execute the callback when R is idle at the top level, or whenever `later::run_now()` is called, for instance automatically in Shiny's event loop.
 - Function is called back with a character vector of the paths of all files which have changed.
 
-```{r example}
+```{r}
+#| label: example
 library(watcher)
 dir <- file.path(tempdir(), "watcher-example")
 dir.create(dir)

README.md

@@ -78,7 +78,7 @@ w
 #>     start: function () 
 #>     stop: function () 
 #>   Private:
-#>     path: /tmp/RtmpR5tJmF/watcher-example
+#>     path: /tmp/RtmpLJO67C/watcher-example
 #>     running: FALSE
 #>     watch: externalptr
 w$start()
@@ -88,19 +88,19 @@ file.create(file.path(dir, "newfile"))
 file.create(file.path(dir, "anotherfile"))
 #> [1] TRUE
 later::run_now(1)
-#> [1] "/tmp/RtmpR5tJmF/watcher-example/newfile"
-#> [1] "/tmp/RtmpR5tJmF/watcher-example/anotherfile"
+#> [1] "/tmp/RtmpLJO67C/watcher-example/newfile"
+#> [1] "/tmp/RtmpLJO67C/watcher-example/anotherfile"
 
 newfile <- file(file.path(dir, "newfile"), open = "r+")
 cat("hello", file = newfile)
 close(newfile)
 later::run_now(1)
-#> [1] "/tmp/RtmpR5tJmF/watcher-example/newfile"
+#> [1] "/tmp/RtmpLJO67C/watcher-example/newfile"
 
 file.remove(file.path(dir, "newfile"))
 #> [1] TRUE
 later::run_now(1)
-#> [1] "/tmp/RtmpR5tJmF/watcher-example/newfile"
+#> [1] "/tmp/RtmpLJO67C/watcher-example/newfile"
 
 w$stop()
 unlink(dir, recursive = TRUE, force = TRUE)