sebastiansauer

out <- renv::dependencies()

ps <- out$Package %>% unique()
missing <- setdiff(ps, installed.packages()) # can take a long time
missing

install.packages(missing)

sebastiansauer

library(tidyverse)
  data(mtcars)

mtcars %>%
  select(mpg, hp) %>%
  slice_head(n = 5)

sebastiansauer

data(mtcars)
library(dplyr)  # nicht "tidyverse", denn "dplyr" reicht

mtcars %>% 
  filter(am = 0)  # den kürzesten Code, der Ihren Fehler entstehen lässt!

sessionInfo()  # gibt Infos zur R-Version etc. aus

sebastiansauer

library(ggplot2)
source('geom_font_awesome.R')

shapes_map = c(
    setosa = 'car',
    virginica = 'ban',
    versicolor = 'star'
)

(

sebastiansauer

```{r libs, include = FALSE}
library(tidyverse)
```


```{r global-knitr-options, include=FALSE}
knitr::opts_chunk$set(fig.pos = 'H',
                      fig.asp = 0.618,

sebastiansauer

```{r libs, include = FALSE}
library(tidyverse)
```


```{r global-knitr-options, include=FALSE}
knitr::opts_chunk$set(fig.pos = 'H',
                      fig.asp = 0.618,

sebastiansauer

sebastiansauer

---
title: "Grading BDA WS20"
author: "Sebastian Sauer"
date: "2/5/2021"
output: html_document
---

```{r global-knitr-options, include=FALSE}
knitr::opts_chunk$set(fig.pos = 'H',
                      fig.asp = 0.618,

sebastiansauer

extract_solutions <- function(file) {
  
  require(tidyverse)
  
  # input:
  # file: the output file from the exam2nops call storing the exams meta info
  
  # output:
  # list of solutions for each exam variant and each question

sebastiansauer

This is pdfTeX, Version 3.14159265-2.6-1.40.20 (TeX Live 2019) (preloaded format=pdflatex 2020.1.13)  28 JAN 2020 11:54
entering extended mode
 restricted \write18 enabled.
 %&-line parsing enabled.
**testing.tex
(./testing.tex
LaTeX2e <2019-10-01> patch level 3

(/Users/sebastiansaueruser/Library/TinyTeX/texmf-dist/tex/latex/beamer/beamer.c
ls