# Some Title

Your Name

## 1. A Section

### 1.1. A Subsection

- A list with a link.

- Yet another entry in the list.

## 2. Code

    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)
    }