# Pipe-Operator


## Aufgabe 1

Schreibe den folgenden Code mit Hilfe des Pipe-Operators um: 

```{r}

numbers <- c(-1, -2, -3, -4, -5)
numbers_positive <- abs(numbers)
numbers_sum <- sum(numbers_positive)
print(numbers_sum)

```


```{r}
# Hier kannst du deine Lösung ausprobieren.


```



## Aufgabe 2

Erstelle mit Hilfe des Pipe-Operators einen Vektor mit den Werten $1.201, 1.243, 1.264, 1.156$ und runde diese auf zwei Nachkommastellen. Speichere das Endprodukt unter `numbers_round`.

```{r}
# Hier kannst du deine Lösung ausprobieren.


```



## Aufgabe 3

Erstelle mit Hilfe des Pipe-Operators einen Vektor mit den Werten $2,3,6,7$, berechne den Mittelwert und ziehe die Quadratwurzel aus dem Mittelwert. Speichere das Endprodukt unter `score`.

```{r}
# Hier kannst du deine Lösung ausprobieren.


```