# Some Title

Your Name

## 1. What is this About?

This will not show up on slides.

### 1.1. Some simple asciidoc

- A list with a link.

- Yet another entry in the list.

## 2. Including Code

Do not use the include macro provided by asciidoc! Instead prefix all source statements with

    #+ code = readLines("file_to_be_sourced")
    #+ include = FALSE

It est use

    #+ code = readLines("src/sum.R")
    #+ include = FALSE
    source("src/sum.R")

to produce

    a  <- c(2, 3, 4, 10) # <1>
    value <- 0 # <2>
    for (a_i in a) { # <3>
        value <- value + a_i  # <4>
    }
    print(value) # <5>

    ## [1] 19

## 3. A new section

    my_sum <- function(x) {
        value <- 0
        for (x_i in x) {
            value <- value + x_i
        }
        return(value)
    }

### 3.1. A subsection

    print(value)

    ## [1] 19

    print(my_sum(1:3))

    ## [1] 6

Inline code does not work: Object `value` has value `r value`.