---
title: "Praca domowa - typy danych"
author: "Bartosz Maćkiewicz"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

## Zadania domowe

1. Zapoznać się z trzema notatnikami (zakładka "Materiały"):
* "Podstawowe typy danych" 
* "Zaawansowane typy danych" 
* "Indeksowanie"

2. Wykonać poniższe zadania


### Zadania do notebooka "Zaawansowane typy danych"

A. Proszę napisać w R polecenie (lub ciąg poleceń), które tworzy następującą macierz bez użycia funkcji `c()` (proszę pogłówkować jak to zrobić sprytnie!):

```
100 200 300

200 300 400

300 400 500

400 500 600

500 600 700
```

Podpowiedź: proszę przeanalizować, co robi ten kod `1:5 * 100` i zastanowić się, jak on działa.

```{r}
# Tutaj miejsce na Twój kod
```

B. Proszę stworzyć następującą macierz za pomocą polecenia `rbind()`.

```
250  34   46   58   7

170  11   42   13   14

200  300  40   50  600
```

```{r}
# Tutaj miejsce na Twój kod
```


C. Proszę stworzyć ramkę danych (`data.frame`) o liderach Pokemon w regionie Kanto. Nazwą wiersza ma być imie lidera (proszę doczytać z Notatnika o nazwach wierszy), a kolumnami

* miasto
* typ Pokemonów, którymi posługuje się dany lider
* kolejność (proszę założyć, że na stronie podana jest prawidłowa - od pierwszego do ostatniego)
[Region Kanto](http://pokemon.wikia.com/wiki/Kanto_Gyms)

```{r}
# Tutaj miejsce na Twój kod
```

### Zadania do notebooka "Indeksowanie"

D. Proszę napisać własnymi słowami (po polsku), który element czego wybiorą następujące polecenia:

```
lista[[4]][[3]][1]

lista$rasy_psow$male_psy[2]
```

**Odpowiedź**

*Tutaj wpisz swoją odpowiedź*

Następnie proszę stworzyć jakiekolwiek przykładowe listy, dla których te polecenia (z zadanie wyżej) zwracają jakiś rezultat.

```{r}
# Tutaj miejsce na Twój kod
```

E. Proszę wczytać zbiór danych `beaver1` za pomocą polecenia `data(beavers)` i napisać polecenie R, które odpowie na następujące pytania. Istotne jest, aby Państwa polecenia zwracały dokładną odpowiedź (np. "346" albo "35.4").

[Więcej o tym zbiorze danych](https://stat.ethz.ch/R-manual/R-devel/library/datasets/html/beavers.html)

a) Którego dnia pomiarów bóbr osiągnął rekordową, najwyższą temperaturę?

```{r}
# Tutaj miejsce na Twój kod
```

b) Jaką najwyższą temperaturę osiągnął bóbr w czasie okresów aktywnych pierwszego dnia pomiarów?

```{r}
# Tutaj miejsce na Twój kod
```