From e5b8d3d3a3dd9f1d3acaddbbdcae1e9e69bbf291 Mon Sep 17 00:00:00 2001 From: petr-pavlik Date: Tue, 12 Nov 2024 10:04:06 +0100 Subject: [PATCH] update 06_odhad --- 06_odhad.qmd | 67 +- 07_testovani.qmd | 67 +- 10_hydro_index.qmd | 3 +- _quarto.yml | 4 +- docs/01_uvod_do_R_1 2.html | 932 +++++++++++ docs/02_uvod_do_R_2.html | 84 +- .../figure-html/unnamed-chunk-11-1 2.dvi | Bin 0 -> 55216 bytes .../figure-html/unnamed-chunk-11-1 2.svg | 196 +++ .../figure-html/unnamed-chunk-11-1.dvi | Bin 55216 -> 55216 bytes .../figure-html/unnamed-chunk-11-1.svg | 10 +- docs/03_grafy.html | 52 +- .../figure-html/unnamed-chunk-12-1 2.svg | 316 ++++ .../figure-html/unnamed-chunk-13-1 2.svg | 329 ++++ .../figure-html/unnamed-chunk-14-1 2.svg | 240 +++ .../figure-html/unnamed-chunk-14-1.svg | 75 +- .../figure-html/unnamed-chunk-15-1 2.svg | 32 + .../figure-html/unnamed-chunk-17-1 2.svg | 32 + .../figure-html/unnamed-chunk-2-1 2.svg | 401 +++++ .../figure-html/unnamed-chunk-2-1.svg | 376 +++-- .../figure-html/unnamed-chunk-3-1 2.svg | 148 ++ .../figure-html/unnamed-chunk-4-1 2.svg | 239 +++ .../figure-html/unnamed-chunk-4-1.svg | 226 +-- .../figure-html/unnamed-chunk-5-1 2.svg | 374 +++++ .../figure-html/unnamed-chunk-5-1.svg | 428 +++--- .../figure-html/unnamed-chunk-6-1 2.svg | 208 +++ .../figure-html/unnamed-chunk-6-1.svg | 228 +-- .../figure-html/unnamed-chunk-8-1 2.svg | 674 ++++++++ .../figure-html/unnamed-chunk-3-1 2.svg | 181 +++ .../figure-html/unnamed-chunk-6-1 2.svg | 290 ++++ docs/05_rozdeleni 2.html | 1328 ++++++++++++++++ docs/05_rozdeleni.html | 8 +- .../figure-html/unnamed-chunk-10-1 2.svg | 190 +++ .../figure-html/unnamed-chunk-11-1 2.svg | 412 +++++ .../figure-html/unnamed-chunk-11-1.svg | 324 ++-- .../figure-html/unnamed-chunk-12-1 2.svg | 242 +++ .../figure-html/unnamed-chunk-13-1 2.svg | 254 +++ .../figure-html/unnamed-chunk-17-1 2.svg | 277 ++++ .../figure-html/unnamed-chunk-2-1 2.svg | 316 ++++ .../figure-html/unnamed-chunk-4-1 2.svg | 304 ++++ .../figure-html/unnamed-chunk-9-1 2.svg | 827 ++++++++++ .../figure-html/unnamed-chunk-9-1.svg | 1318 ++++++++-------- docs/06_odhad 2.html | 1100 +++++++++++++ docs/06_odhad.html | 94 +- .../figure-html/unnamed-chunk-2-1 2.svg | 1358 +++++++++++++++++ .../figure-html/unnamed-chunk-2-1 3.svg | 1358 +++++++++++++++++ .../figure-html/unnamed-chunk-2-1 4.svg | 1358 +++++++++++++++++ .../figure-html/unnamed-chunk-2-1 5.svg | 1358 +++++++++++++++++ .../figure-html/unnamed-chunk-5-1.png | Bin 0 -> 51250 bytes .../figure-html/unnamed-chunk-6-1.png | Bin 0 -> 39186 bytes .../figure-html/unnamed-chunk-6-1.svg | 119 ++ .../figure-html/unnamed-chunk-6-2.png | Bin 0 -> 84406 bytes .../figure-html/unnamed-chunk-6-2.svg | 153 ++ .../figure-html/unnamed-chunk-7-1.svg | 179 +-- .../figure-html/unnamed-chunk-2-1 2.svg | 156 ++ docs/09_casove_rady 2.html | 1104 ++++++++++++++ .../figure-html/unnamed-chunk-3-1 2.svg | 244 +++ .../figure-html/unnamed-chunk-4-1 2.svg | 407 +++++ .../figure-html/unnamed-chunk-5-1 2.svg | 359 +++++ .../figure-html/unnamed-chunk-5-2 2.svg | 172 +++ .../figure-html/unnamed-chunk-7-1 2.svg | 391 +++++ .../figure-html/unnamed-chunk-8-1 2.svg | 159 ++ docs/10_hydro_index.html | 8 +- .../figure-html/unnamed-chunk-3-1 2.svg | 171 +++ .../figure-html/unnamed-chunk-3-1.png | Bin 62093 -> 0 bytes .../figure-html/unnamed-chunk-4-1 2.svg | 299 ++++ ...-chunk-6-1.svg => unnamed-chunk-5-1 2.svg} | 0 .../figure-html/unnamed-chunk-7-1.svg | 336 ---- docs/11_korelace_regrese 2.html | 1243 +++++++++++++++ .../figure-html/unnamed-chunk-11-1 2.svg | 965 ++++++++++++ .../figure-html/unnamed-chunk-12-1 2.svg | 176 +++ .../figure-html/unnamed-chunk-3-1 2.svg | 496 ++++++ .../figure-html/unnamed-chunk-3-1.svg | 851 +++++------ .../figure-html/unnamed-chunk-7-1 2.svg | 191 +++ .../figure-html/unnamed-chunk-9-1 2.svg | 973 ++++++++++++ docs/12_extremalni_rozdeleni 2.html | 878 +++++++++++ .../figure-html/unnamed-chunk-1-1 2.svg | 286 ++++ docs/data/.01138000 2.dly.icloud | Bin 0 -> 164 bytes docs/data/budyko_dfr 2.rds | Bin 0 -> 2154 bytes docs/include/webex 2.css | 120 ++ docs/index 2.html | 828 ++++++++++ docs/index.html | 2 +- docs/intro 2.html | 1057 +++++++++++++ docs/intro.html | 4 +- docs/search.json | 34 +- docs/style 2.css | 413 +++++ 85 files changed, 28858 insertions(+), 2554 deletions(-) create mode 100644 docs/01_uvod_do_R_1 2.html create mode 100644 docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1 2.dvi create mode 100644 docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1 2.svg create mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-12-1 2.svg create mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-13-1 2.svg create mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-14-1 2.svg create mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-15-1 2.svg create mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-17-1 2.svg create mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-2-1 2.svg create mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-3-1 2.svg create mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-4-1 2.svg create mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-5-1 2.svg create mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-6-1 2.svg create mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-8-1 2.svg create mode 100644 docs/04_popisna_files/figure-html/unnamed-chunk-3-1 2.svg create mode 100644 docs/04_popisna_files/figure-html/unnamed-chunk-6-1 2.svg create mode 100644 docs/05_rozdeleni 2.html create mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-10-1 2.svg create mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-11-1 2.svg create mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-12-1 2.svg create mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-13-1 2.svg create mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-17-1 2.svg create mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-2-1 2.svg create mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-4-1 2.svg create mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-9-1 2.svg create mode 100644 docs/06_odhad 2.html create mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-2-1 2.svg create mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-2-1 3.svg create mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-2-1 4.svg create mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-2-1 5.svg create mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-5-1.png create mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-6-1.png create mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-6-1.svg create mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-6-2.png create mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-6-2.svg create mode 100644 docs/07_testovani_files/figure-html/unnamed-chunk-2-1 2.svg create mode 100644 docs/09_casove_rady 2.html create mode 100644 docs/09_casove_rady_files/figure-html/unnamed-chunk-3-1 2.svg create mode 100644 docs/09_casove_rady_files/figure-html/unnamed-chunk-4-1 2.svg create mode 100644 docs/09_casove_rady_files/figure-html/unnamed-chunk-5-1 2.svg create mode 100644 docs/09_casove_rady_files/figure-html/unnamed-chunk-5-2 2.svg create mode 100644 docs/09_casove_rady_files/figure-html/unnamed-chunk-7-1 2.svg create mode 100644 docs/09_casove_rady_files/figure-html/unnamed-chunk-8-1 2.svg create mode 100644 docs/10_hydro_index_files/figure-html/unnamed-chunk-3-1 2.svg delete mode 100644 docs/10_hydro_index_files/figure-html/unnamed-chunk-3-1.png create mode 100644 docs/10_hydro_index_files/figure-html/unnamed-chunk-4-1 2.svg rename docs/10_hydro_index_files/figure-html/{unnamed-chunk-6-1.svg => unnamed-chunk-5-1 2.svg} (100%) delete mode 100644 docs/10_hydro_index_files/figure-html/unnamed-chunk-7-1.svg create mode 100644 docs/11_korelace_regrese 2.html create mode 100644 docs/11_korelace_regrese_files/figure-html/unnamed-chunk-11-1 2.svg create mode 100644 docs/11_korelace_regrese_files/figure-html/unnamed-chunk-12-1 2.svg create mode 100644 docs/11_korelace_regrese_files/figure-html/unnamed-chunk-3-1 2.svg create mode 100644 docs/11_korelace_regrese_files/figure-html/unnamed-chunk-7-1 2.svg create mode 100644 docs/11_korelace_regrese_files/figure-html/unnamed-chunk-9-1 2.svg create mode 100644 docs/12_extremalni_rozdeleni 2.html create mode 100644 docs/12_extremalni_rozdeleni_files/figure-html/unnamed-chunk-1-1 2.svg create mode 100644 docs/data/.01138000 2.dly.icloud create mode 100644 docs/data/budyko_dfr 2.rds create mode 100644 docs/include/webex 2.css create mode 100644 docs/index 2.html create mode 100644 docs/intro 2.html create mode 100644 docs/style 2.css diff --git a/06_odhad.qmd b/06_odhad.qmd index eb2aa0f..63945f0 100644 --- a/06_odhad.qmd +++ b/06_odhad.qmd @@ -107,7 +107,7 @@ Takto formulovaný bodový a intervalový je jednou z nejčastěji prováděnýc mean(x) ``` -Vidíme, že $x =$ `r x`. Pro tento průmer následně spočítáme interval spolehlivosti. +Vidíme, že $x =$ `r mean(x)`. Pro tento průmer následně spočítáme interval spolehlivosti. ## Intervalový odhad @@ -145,48 +145,52 @@ $$ f(y|\mu, \sigma) = \dfrac{1}{\sigma\sqrt{2\pi}}\exp\left[-\dfrac{(y-\mu)^2}{2\sigma^2}\right] $$ {#eq-maxlike-normalni-rozdeleni} +Věrohodnostní funkce je vyjádřena: + +$$ +L\left(\mu, \sigma^2; x_1, \ldots, x_n\right) = (2\pi\sigma^2)^{-n/2}\exp\left(-\dfrac{1}{2\sigma^2}\sum_{j=1}^{n}(x_j-\mu)^2\right) +$$ {#eq-05odhad-likelihood} + +Dva parametry $\mu$ a $\sigma$ jsou neznámé + ```{r} mu <- 5 # <1> sigma <- 1 # <1> -n <- 10000 # <2> +n <- 1000 # <2> x <- rnorm(n, mu, sigma^2) # <2> -likelihood <- function(params) { # <3> - mean_param <- params[1] # <3> - sd_param <- params[2]# <3> - return(prod(dnorm(x, mean = mean_param, sd = sd_param)))# <3> +norm.lik <- function(pars, x) { # <3> + n <- length(x) # <3> + mu <- pars[1] + sigma2 <- pars[2] + logl <- -0.5 * n * log(2*pi) - 0.5 * n * log(sigma2) - + (1/(2 * sigma2))*sum((x - mu)^2) # <3> + return(-logl)# <4> } -result <- optim(par = c(5, 1), #<4> - fn = function(params) -likelihood(params), #<4> - hessian = TRUE) #<4> - -mle_mean <- result$par[1] #<5> -mle_sd <- result$par[2] #<5> - -cat("MLE pro střední hodnotu:", mle_mean, "\n") -cat("MLE pro směrodatnou odchylku:", mle_sd, "\n") +result <- optim(par = c(0.1, 2), #<5> + fn = norm.lik, #<5> + x = x, #<5> + method = "BFGS", #<5> + hessian = TRUE) #<5> +mle_mean <- result$par[1] #<6> +mle_sigma2 <- result$par[2] #<6> ``` 1. Skutečné parametry $\mu$ a $\sigma$, které použijeme ke generování náhodných čísel. 2. Získáme pseudonáhodná čísla z Normálního rozdělení. -3. Definice věrohodnostní funkce. -4. S použitím funkce `optim()` hledáme maximálně věrohodný odhad. -5. Získané hodnoty odhadů. +3. Definice věrohodnostní funkce @eq-05odhad-likelihood, +4. je nutné pro optimalizační algoritmus vrátit v záporné hodnotě. +5. S použitím funkce `optim()` hledáme maximálně věrohodný odhad. Je potřeba zadat +počáteční parametry, optimalizovanou funkci, vektor měření a methodu řešení. Pokud +bychom chtěli i intervalový odhad, je nutné nechat spočítat hessián, neboli determinant +Hessovy matice. +6. Uložíme získané hodnoty odhadů. -Spočítejte hodnotu věrohodnostní funkce pro $X = 4$ - -```{r} -n <- 10000 -x <- rnorm(n, 5, 1) -L <- x*pnorm(x, mean = 5, sd = 1) -max(L) -boxplot(x) -curve(dnorm(x, 4, 1), xlim = c(0,8)) -curve(dlnorm(x, 1, 0.5), add = TRUE) -``` +MLE pro střední hodnotu: `r mle_mean`\ +MLE pro rozptyl: `r mle_sigma2`. ## $t$-test {#ttest} Testování hypotéz podrobněji probereme v @sec-testovani. Nyní si nicméně ukážeme, @@ -210,6 +214,5 @@ $$ pro $\mu < \mu_0$. $n-1$ je počet stupňů volnosti. ## Úloha 1. Spočítejte pomocí funkce `t.test` intervalový odhad pro `x = rnorm(100)` a `set.seed(100)`.\ - 2. Spočítejte, zda můžeme s pravděpodobností $90\:\%$ zamítnout hypotézu, že střední hodnota veličiny generující výběr `x <- c(0.77, 1.11, 1.14, 0.92, 0.49, 5.03, 1.35, 0.94, 0.33, 2.49)` je menší než 1.\ - 3. Pro stejný výběr spočítejte, zda je možné na hladině významnosti $0.05$ zamítnout hypotézu, že střední hodnota veličiny generující výběr je rovna $1$. -::: \ No newline at end of file +::: + diff --git a/07_testovani.qmd b/07_testovani.qmd index 8b5bc42..fbf497b 100644 --- a/07_testovani.qmd +++ b/07_testovani.qmd @@ -100,14 +100,63 @@ $$ $$ -## Rekapitulace - -::: callout-tip -## Úloha - - 1. a) Nalezněte 90% interval spolehlivosti pro roztpyl veličiny - b) Otestujte, zda veličiny generující sobory $x$ a $y$ mají shodný rozptyl. -::: - + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/10_hydro_index.qmd b/10_hydro_index.qmd index 8ec945e..f2a270b 100644 --- a/10_hydro_index.qmd +++ b/10_hydro_index.qmd @@ -187,4 +187,5 @@ points(Mdenni, pch = 21, bg = rev(rainbow(13, end = 0.7))) 3. Spočtete průměrný roční minimální průtok. ::: -## SPI \ No newline at end of file + + diff --git a/_quarto.yml b/_quarto.yml index ad3a9a4..d81502b 100644 --- a/_quarto.yml +++ b/_quarto.yml @@ -75,7 +75,7 @@ format: fig-format: svg fig-dpi: 400 fig-cap-location: bottom - pdf: - documentclass: scrreprt + # pdf: + # documentclass: scrreprt editor: visual lang: cs-CZ diff --git a/docs/01_uvod_do_R_1 2.html b/docs/01_uvod_do_R_1 2.html new file mode 100644 index 0000000..f741c51 --- /dev/null +++ b/docs/01_uvod_do_R_1 2.html @@ -0,0 +1,932 @@ + + + + + + + + + +Metody vyhodnocování vodohospodářských dat - 3  R & RStudio + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
+
+ +
+ +
+ + +
+ + + +
+ +
+
+

3  R & RStudio

+
+ + + +
+ + + + +
+ + +
+ +
+
+
+ +
+
+Cíle cvičení +
+
+
+
    +
  • Naučit se založit projekt
    • +
  • Rozeznat Základní soubory projektu a prostředí
    • +
  • Projekt či součást projektu uložit a otevřít
    • +
  • Orientovat se v hlavním okně
    • +
  • Přepínat mezi výpočtem v konzoli a skriptu
    • +
+
+
+

R je volně dostupné programové prostředí pro statistické výpořty a grafiku. Interpretr jazyka se základní funkcionalitou lze stáhnout ze stránek https://www.r-project.org.

+

RStudio (dnes také společnost Posit Inc.) je integrované vývojové prostředí (IDE), specializované pro práci s jazykem R. Obsahuje řadu užitečných nástrojů usnadňujících organizaci, tvorbu reportů, práci s SQL databázemi, vývojem funkčních balíčků a mnoho dalšího.

+
+

3.1 Hlavní okna a panely

+
+
+

+
Obrázek 3.1: Obr. 1: Základní layout prostředí RStudio.
+
+
+

V základním zobrazení Obrázek 3.1 bychom měli v levé části vidět panel Console. S konzolí nebudeme pracovat příliš intenzivně, slouží zejména k zadávání jednoduchých příkazů, například vyhodnocení proměnné. Pravou část vidíme rozdělenu na dolní a horní polovinu. V té horní jsou důležité panely Environment kde se nachází všechny objekty a vlastní funkce, které jsme vytvořili v rámci session. Dále Výchozí rozvržení je možné měnit Tools > Global options… > Pane layout.

+
+
+
+ +
+
+Úloha +
+
+
+
    +
  1. Provedeme jedno užitečné nastavení duhových závorek
    2. +
+
+
+

+
Obr. 2: Nastavení duhových závorek a dalších vlastností v okně Global Options…
+
+
+
+
+
+
+

3.2 Zakládáme projekt

+

Je vhodné seskupovat svoji práci do zv. projektů - ucelených souborů skriptů, dat a výstupů - podle jednotlivých projektů, kterým se věnuji.

+
    +

  1. Při spuštěném programu z hlavní nabídky vybereme File > New Project…

    +Obr. 2 - Volba typu založení projektu
    2. +

  2. Vybereme New Directory a zvolíme New Project. Ostatní možnosti v tomto kurzu využívate nebudeme.

    +Obr. 3 - Volba typu projektu
    3. +

  3. Projektu je dále nutné zadat název Directory name. Pokud používate verzovací systém Git, můžete zaškrtnout volbu Create a git repository. V tomto kurzu používat nebudeme.

    +Obr. 3 - Volba umístění a názvu projektu
    4. +

  4. Po úspěšném založení projektu by se mělo zobrazit hlavní okno programu s přednastvenými panely. V nastavení učeben ČZU odpovídá rozvržení 1. obrázku.

    5. +
+
+
+
+ +
+
+Úloha +
+
+
+
    +
  1. Vytvořte projekt s názvem “MVVD_cv1”.
    2. +
+
+
+
+
+

3.3 Pracovní postup a jeho opakovatelnost

+

K systematické práci a analýze zejména v exaktních vědách patří dodržování jistých pracovních zásad, které umožňují jednak objektivní kontrolu výsledků a jednak jejich opětovného získání. Níže je uvedeno pár zásad, jejichž dodržování vede k celkové duševní pohodě a rovnováze jak vaší vlastní, tak kolegů.

+
    +
  • Při psaní kódu se řiďte unifikovaným schématem jmenných konvencí, odsazování a vkládání mezer, a komentování. Jedno takové má například Hadley Wickham, či Google.
    +
    • +
  • Každé cvičení začněte ideálně tvorbou nového projektu v oddělené složce, nebo alespoň nového skriptu.
    +
    • +
  • Při zavírání RStudio neukládejte pracovní prostředí do souboru “*.RData”. Uloží se do něj vše co máte právě v Environment, což nemusí nutně pocházet z pracovního postupu uchovaného ve skriptech (byť při dodržování jiných zásad z tohoto sezamu by tomu tak být nemělo).
    • +
  • R bohužel umožnuje připínat a odepínat data.frame pomocí funkcí attach() a detach(), na které je vhodné ihned po přečtení této věty zapomenout.
    • +
+
+
+Kód +
?ls
+rm(list = ls())
+?objects
+
+
+
+
+Kód +
l <- list(A = 1:3, B = 3:5)
+attach(l)
+A
+
+
+
[1] 1 2 3
+
+
+
    +

  • dtto funkce fix(), která umožňuje manipulovat s daty formou GUI tabulkového procesoru.
    +

    • +

  • Naučte se používat :: značící jmenný prostor, ze kterého funkce pochází. Například filter() je funkce definována ve více jmenných prostorech často používaných balíčků.

    • +

  • Oddělujte vzájemně surová data, zpracovaná data, skripty analýz a výstupy. Souborová struktura projektu může vypadat například takto:

    +
    ~/mzp_analyza/
+ ├── data/
+ |   ├── raw_data/ 
+ |   └── zpracovana_data/ 
+ ├── skripty/
+ |   └── 01_load.R
+ ├── vystupy/
+ |  └── 01_liniovy_graf_m_denni_vody.pdf
+ └── mzp_analyza.RProj
    • +
+ + +
+ +
+ + + + +
+ + + + \ No newline at end of file diff --git a/docs/02_uvod_do_R_2.html b/docs/02_uvod_do_R_2.html index 993f1d7..395f9fd 100644 --- a/docs/02_uvod_do_R_2.html +++ b/docs/02_uvod_do_R_2.html @@ -461,27 +461,27 @@

11
-Negace +Negace
12
-Je \(x\) “pravda”? +Je \(x\) “pravda”?
13
-Je něco z obsahu “pravda”? +Je něco z obsahu “pravda”?
14
-Je vše z obsahu “pravda”? +Je vše z obsahu “pravda”?
15
-Je něco obsaženo v? +Je něco obsaženo v?
16
-Chybí něco něco z obsahu v? +Chybí něco něco z obsahu v?
@@ -759,15 +759,15 @@

1
-Sčítám vektory přičemž délka jednoho je násobkem délky druhého. +Sčítám vektory přičemž délka jednoho je násobkem délky druhého.
2
-Násobím vektory přičemž délka jednoho je násobkem délky druhého. +Násobím vektory přičemž délka jednoho je násobkem délky druhého.
3
-Násobení vektoru číslenou hodnotou +Násobení vektoru číslenou hodnotou
@@ -798,35 +798,35 @@

Práce s vekto
1
-Tvorba vektoru \(\boldsymbol{\mathrm{x}}\) různými úkony. Použití sekvence, repetice, opakování a vzorkování. +Tvorba vektoru \(\boldsymbol{\mathrm{x}}\) různými úkony. Použití sekvence, repetice, opakování a vzorkování.
2
-Transpozice vektoru. +Transpozice vektoru.
3
-Pojmenování pozic ve vektoru +Pojmenování pozic ve vektoru
4
-Výběr hodnot z vektoru na základě podmínky +Výběr hodnot z vektoru na základě podmínky
5
-Výběr hodnot z vektoru na základě pozice +Výběr hodnot z vektoru na základě pozice 
         [,1]     [,2]     [,3]     [,4]     [,5]     [,6]     [,7]     [,8]
-[1,] 99.11547 1.772909 859.3662 58.18504 144.9733 63.78054 381.4557 1436.548
-         [,9]   [,10]
-[1,] 23.28053 3.96985
-        B         D         F         G         H 
- 1.331506  7.627912  7.986272 19.530891 37.901815 
+[1,] 6.663615 122.7062 612.4235 1.463653 11.72349 15.54336 277.8602 1.877454
+         [,9]    [,10]
+[1,] 500.5559 437.5033
+        B         D         E         G         H         I         J 
+11.077285  1.209815  3.423958 16.669140  1.370202 22.373108 20.916580 
          A          B          C 
- -9.955675   1.331506 -29.314948
+ -2.581398 11.077285 -24.747191
@@ -877,7 +877,7 @@

1
-Převod na rozměr \(2\times 2\) +Převod na rozměr \(2\times 2\)

@@ -979,19 +979,19 @@

1
-Struktura objektu +Struktura objektu
2
-Dimenze matice +Dimenze matice
3
-Singulární rozklad +Singulární rozklad
4
-Prvky na diagonále matice +Prvky na diagonále matice
@@ -1066,11 +1066,11 @@

value = rnorm(5)) DF ## name value -## 1 a -1.3263777 -## 2 b 0.2458498 -## 3 c -1.3789535 -## 4 d 0.7170527 -## 5 e -1.0951034 +## 1 a 0.5001322 +## 2 b -0.4163139 +## 3 c -1.1695121 +## 4 d 1.6076695 +## 5 e -0.1154482 DF["name"] # podvýběr do data.frame ## name ## 1 a @@ -1096,7 +1096,7 @@

str(DF) ## 'data.frame': 365 obs. of 3 variables: ## $ mon : chr "Jan" "Jan" "Jan" "Jan" ... -## $ value: num -2.181 -0.575 -0.122 1.27 -0.324 ... +## $ value: num -1.77 1.08 -2.406 -0.258 2.643 ... ## $ yr : num 2001 2001 2001 2001 2001 ... names(DF) ## [1] "mon" "value" "yr" @@ -1142,7 +1142,7 @@

1
-Řetěz podmínek se uzavře v momentě, kdy je výraz v závorce poprvé vyhodnocen jako pravdivý. +Řetěz podmínek se uzavře v momentě, kdy je výraz v závorce poprvé vyhodnocen jako pravdivý.
@@ -1180,11 +1180,11 @@

1
-Varianta “A nenastala, +Varianta “A nenastala,
2
-nastala varianta “B”, tzn. výraz je vyhodnocen ve tvaru \(2\cdot 3 = 6\) +nastala varianta “B”, tzn. výraz je vyhodnocen ve tvaru \(2\cdot 3 = 6\)
@@ -1295,11 +1295,11 @@

1
-Prováděj +Prováděj
2
-Vnořenou podmínkou následovanou klíčovým slovem break definujeme konec cyklu. +Vnořenou podmínkou následovanou klíčovým slovem break definujeme konec cyklu.
@@ -1352,12 +1352,12 @@

1
-Příklad funkce, která vyhledá nejbližší z hodnot vektoru x k referenční hodnotě value. +Příklad funkce, která vyhledá nejbližší z hodnot vektoru x k referenční hodnotě value.
-
Hodnota nejblíže 0 z vektoru x je: -0.0001032935
+
Hodnota nejblíže 0 z vektoru x je: 0.01184226
@@ -1367,16 +1367,16 @@

  1. Zvolte platné tvrzení pro data.frame: -
    - +
    +
  2. Matici je možné vytvořit z vektoru přidáním dimenze:
  3. Co je výsledkem výrazu: \(\sin(\frac{0}{0})\)
  4. Vyberte, platné tvrzení pro list: -
    - +
    +
  5. Napište výraz pro nepřiřazenou číselnou hodnotu :
    6. diff --git a/docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1 2.dvi b/docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1 2.dvi new file mode 100644 index 0000000000000000000000000000000000000000..01443def3195aef3f9a510436f8825ef943c13e8 GIT binary patch literal 55216 zcmeHQ|EnX{b=TS(n_W9Cc0zIDO?({)1Y^z4jAk^F6R(pcr7nRGHi=1iyyAJIc~9y} znqg+%?vus)$xwn5z51<7mrbF&hNKij`com0wqU49Apbz|FHM@CQW_A+{?L4*ujkxv zGa8Nb^r|PV^m^Z-)#%Rsa_+gGd(XM&o-^~`51o7c*1MNJU4p-dfBrQ2ivKkd>?YxE zLQLJXG{ewz`vtwGo8N>S=P=uGe@F0l_xnHikHI1QH~eVRcN>26V!N{Cde{AKqujXB z3S%vdg5k5F8~Rb)dd+{)sOnm!Ua#9>^1NYHHM6Sgl`uIN44|r?4F|`6ylDEZon}J(J+Da`{x;Dy$0o6#v|C;OW~-4j$;KwpF{Ry$M^H3H-osHIwx$mbVTjwq0zYUAu5Y6^Ug{S1dVep~XUeFFAMr1_dBnqzk z#3E&bL_xbv99|YXn5K&Ejiw4jjHYUUJK(}TiTu!a6Vh>`>%_2uX|w^a?YmJD&{R5J zVGxpifhB@N^eKj-YX%)7z;EaRei4x3qmxQiCvM~suiXksHVYycCfHs&6?jT7P0_X5 z31-JNAS0a}aRTJ$YNu(L`q?bn-rhqtQ)1wo7ewCR1QmIDJP-Zm6^T69U79cGY^Btv z%o@JRIc1J;N{1o9F@Z+CR^(AC@S+FEFxe=i49tRJy9Ee<@km>M;dpq1H$vMGWEaej z@i~P3uyQj7E09!io(N3CEu4*%;0E>?rw~p!?2TX=>xp1!kK_tdK29yX=Obr$(}L*P zn@&sjBolb)>22@Di66>Aq17-(Ae(p%w8x^Sy=;M=EYPF#D_>yIE0JJS{@W0%j38*{ z^+%$Bji~5A3Qeya#6F$-W6RV@79_Di=9Vdwty3d-lq9jSDuf-Q7JAEuN94(^ch+p{ z-S9S>TrYc_-gPFA=9A=DPr6u55aoh{L{Nb_GXDnFM}NyWLL zb1|06^MWLtcX@#>&@5n{pPP%m54hq0FvNtIb|J`2C!aw3q;FX7ky%ArfGxEEv8E!p z(^S#eXlhntNb`z89L-y-8`Ni;D^xdljte7$jd)h_KN#fz=}0FWmnsyxVj1T`eI!ka zxkYLRTbx(sD6dYc9;9$7)(^hNn_;a;1)*TV6(r57A{fS~ntL)GAzymBpr%qF74v&U z(#@yY42`G7dt=3?x4u|4VbSZ?arMiQn06tSl>hsxCIvZ@)?z80qFba(*Zj*|c4L&* zt1VXJsLi&DN{wSDa(kztabP{^0yshA5U`j<<5)ald5uF*cbvvCJmTs`N+MM^gse@q zjq#KsWdkLafM#CNNEHD=oe-(%tPpD=$aJKLZ6f5Rp7ur*MmbCq3PrFp8+Jw|Fk`}l zm%vCz3c!_;z?(t>kMioI5||Edq40g^pLq+c0V#aP@i(3_tLPQ0+3dnk?yq~GJu(9s zFFalJjR{^s^z2P%#~+1vc1%`F(Q1MrXZfBV7g-DvYYLttVhz zdK46TW{vjx((HsV-p>676F{Gt0Y}@M{dRa*u6oK7&eGwl52h(w0DzM(53brNO>ifgbl`? z+xEd+xem4n&RyU!8 zma%!_Zs)VKTpapd%S{J_=JfhPP<$4)JUk0_AZ(=VV=Hl^ztax3+%_cyQyP9dami)& zb+hS5cxVAeW16r}`uaX;ZTsyQI=`F9%CKbE=<{NQRqpr+J-?8~=gY{ptu_$Y3E*fX zZ3|i%y@v$sLziXK^frRd3%VeJx(Q`_rV2uHWXFW`vAMA_RFsJZNAi!;Gjf~KL_5U! zks%Hl%i78op(jTO7di*%ezlOKY&W1L0k8tnS&caNcEl7Axw8!uEDCEx9;VWgPw($= zfQnQ(wiHo(j!$ogWt!F!&oQwr!Nl~G3r3Q$lPyQte$np7V+>^(Cn5uD<8!tkCqe;p z!1^cqDzazW7H2uf_awzTA523U*Rf*$OAB}7X4u#^tcHK1<@qoqi63R5up!rr%UeNM zZU(`1a=jbe?2>-L9h_}$J8Nt)Gr>=NpHuHSC>VbY}Y zpeC0xubJLL6cpc~EHtgO6rPS}=9PuZYO4!c7(cV6hI5tyYpqPVPwO7bKqn%lbwdYk zXFi*<5t;|9&t}QprnTdJmVN+#)Ys&Af0CgU#xK0^$xpuA0xk3^dOSb}uLgTB05MQs z>V!fvPAC^=a8&v3OW^e~c;{U>!ygQWPw+Da5F>;VtKT~J^-^hgfu{%I!NJ>uzbnW$ z{7bg0HMqp{_k52a8gOnCQ`6zkM5qY=lya4(Rf$EvZQ-O+uF&5VnwRVQGH*GT87il0 z2N25@W9i~D{7*)ZSx6AL6EMm)2>93lRiJ87FB?O6;COBbLk-DD!=HotOeAH32=2~O zHophK3=Wt~FbA!CO<8+`(s zk`_)Mf>$<A_mN!I{V6jZSKGM_Gh2?D1w`|zQ= z&H*FGDI`Z?5l184rsi=Z*nzn?%S4i)RqbjG&ItLpNXM+=S}?7g&y?Xgt3@VYaal~% zBg>~3;uhwYg+)QpoV+1&%km;2+nlr~5UJ2_d$@v(?t0|SnBK(sDpn@3BPyK0KVjoh zD;$qJ;}MHU8)v!%iJ)5`16?3>9gd@0UVT>2qBv-EBk{&`4wnMsz z;uCg4P}v`M8?vfSa9SO(Cd@ov)r@+F(wR%r8$mX zaR@B(X01}K9XlSwr=ccly@|oR3*6!yWQ_X*yqSV{aR1U{_qMK-E`qN$ejf2UotB~h z=(WM!-~ZXs;LY&%{ioi4>)y4}qi_>H=ej3<+4=>%hrGQ0sNhzCFA6OX(3AmWcfy?DP0|l2e0GG;g;BxiOHxyh>9WGU^ zY8g%qcg~h&I@MDaTZ6wo_s-wnf9BawJpb*i?23Da{^N6R!M~*lrmx<4T|s97(9!Ew z4RqVZXgqnrwDqyU{ik*Rb|iJ251jfD@tJErvfxdH&Sv&2$F}SDv zx>Oq6|Hv19`D#xd6@i66GW7SfgYTS&n;N*tYD+NoD_4d&&HQIk4k>Sic`Peu5fREE zVID+G+S*8mgawJ2!QJ10C^>wn_EQiggTqHIb?*MYRMOz`!qIQ<9^obYE#6s9S!(A& z&zW0KK($e>xpS%=%nf_oSK8L9PQ{_Fxt39{oU)5k##r*huP{?AI8rWU4N(ra^QcB$g7x| z<Y7bylgf z@CekLbziv_%ZJ0Rrf#wV>Z}TxTQ7BX5@ePVGN+>Bz|o}m>C>yZz??-3ii(b#$20IO zB0@#S&4Y+Z5=BMF6}<9cg2U*nPj0wKT|e2&BhJP<3eMbmqN3yIVlvmWcP|$|?hqg6 zVAsJR8a$&H5FD2p(Nu8UIw`3ugBImNum)DNl|hTLxvl|P&YXIpLgN+`xu0>0U4nA* z|2s6!ax}{{;kjOAd3D0jxXJ_#Q`T3mI1rQtPZ2xz5e({Ob?zeFhT&zEHF#0sqTbxH z$717DU>r=Kb$7{GE>x7ZzXtl-B=4=|LPe?iYXFsF?bs?L?xZH?vuCcJ0us~4mnSdi z1#?+7Ma9Fd)fxH&7C|Z)PARs>_=AeYg+oOtwrilRtj4OM6x%g`in3v=Ft}O6;Hpc} zVpR;>dbxo?FLX zxHoX#P*Dl~=mz;LnoLyO+dNTDXAu!9?rk1KOp+)n?oGwL-3;BNNv6G<;moZkD(-Fm zxVOo6)_Tp>>x&9}TR7iz$=0k65v@1v;AzZ0;6;W3B%Z=TfPsO< zvNf}!*Wg7f;{Neim|&F{uWIE-e^Q91VQY0uw=7bIv3IN*fHm#Q1vyEE^m4=RHZ})i zLmsz--SEvn`IxuFL1$wshf)r{7;_E^G1O%_WXBIWXBEyyn1(vR5B)J-S<0#vo%EKN z^sF1SKddhfEQnQ@;AI1z{{oBT3~xuzJ zua`>MatGh~b*WT(?%eCQ-o5l`xGFvT^OwH=gP-E3^hc$0_n&$86VHFUbP;ag=Mk?H z_YD31rN{1VUCE|)T9Ep*?%$3|k3v5De8B5;TF(8CeBqa`_GDH_j3DPz@4t2Ln#_3~ R5}n_aO8@rELqCDP{{=x8DPjNs literal 0 HcmV?d00001 diff --git a/docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1 2.svg b/docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1 2.svg new file mode 100644 index 0000000..bf3a58b --- /dev/null +++ b/docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1 2.svg @@ -0,0 +1,196 @@ + + + + + +z +11 + +z +12 + +z +13 + +·· +· + +z +1 +N +z +21 + +z +22 + +z +23 + +z +2 +N +z +31 + +z +32 + +z +33 + +z +3 +N +.. +. +. +. +. + +z +T +1 +z +T +2 +z +T +3 +z +TN + +y +11 + +y +12 + +y +13 + +·· +· + +y +1 +N +y +21 + +y +22 + +y +23 + +y +2 +N +y +31 + +y +32 + +y +33 + +y +3 +N +.. +. +. +. +. + +y +T +1 +y +T +2 +y +T +3 +y +TN + +x +11 + +x +12 + +x +13 + +·· +· + +x +1 +N +x +21 + +x +22 + +x +23 + +x +2 +N +x +31 + +x +32 + +x +33 + +x +3 +N +.. +. +. +. +. + +x +T +1 +x +T +2 +x +T +3 +x +TN + +dimenzesloup +ce +ˇ +r´ +adky + + + \ No newline at end of file diff --git a/docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1.dvi b/docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1.dvi index 01443def3195aef3f9a510436f8825ef943c13e8..2ff252972d342142dfa8c7b0e0a770c76aa74f49 100644 GIT binary patch delta 28 kcmdn6o_WK1<_XF?hDKHf=7tvC3=9m66AhI%2F70p0Dy`JnE(I) delta 28 kcmdn6o_WK1<_XF?2Bua976wM$3=9m66AhI%2F70p0Dxc!l>h($ diff --git a/docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1.svg b/docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1.svg index bf3a58b..e9fa9d9 100644 --- a/docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1.svg +++ b/docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1.svg @@ -2,11 +2,11 @@