inst/extdata/example_lab_file.R

In markmyassignment: Automatic Marking of R Assignments

## My lab report ###
my_name <- "Foo Bar"

# Create a vector with the values pi and e
task1 <- c(pi, exp(1))  

# Create a function that return the sum of the first and last element.
task2 <- function(vector){
  vector[1] + vector[length(vector)]
}

# mark_my_assignment()