## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

## ----eval=FALSE, echo=TRUE----------------------------------------------------
#  #%let x <- 1

## ----eval=FALSE, echo=TRUE----------------------------------------------------
#  #%if (&x == 1)
#    print("x is one!")
#  #%else
#    print("x is something else!")
#  #%end
#