In zkamvar/sandpaper: Create and Curate Carpentries Lessons

new page

This is coming from r R.version.string with an internal link

::: instructor this is an instructor note :::

#| label: example-chunk
point <- function(x, y) {
  stopifnot(is.numeric(x), is.numeric(y))
  structure(list(x = x, y = y), class = "point")
}

abs.point <- function(x) {
  sqrt(x$x ^ 2 + x$y ^ 2)
}

points <- mapply(point, runif(5), runif(5), SIMPLIFY = FALSE)

sapply(points, abs)