From 0ec7a7c872b7706acc0f46695bc0bfc8b4956a6d Mon Sep 17 00:00:00 2001 From: petr-pavlik Date: Mon, 18 Nov 2024 14:26:00 +0100 Subject: [PATCH] add testovani --- 07_testovani.qmd | 132 +- data/temp.csv | 103 ++ docs/01_uvod_do_R_1 2.html | 932 ----------- docs/02_uvod_do_R_2.html | 86 +- .../figure-html/unnamed-chunk-11-1 2.dvi | Bin 55216 -> 0 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 +- .../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 | 80 +- .../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 | 350 ++--- .../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 | 400 +++-- .../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 -------- docs/04_popisna.html | 14 +- .../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 | 24 +- .../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 | 308 ++-- .../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 | 12 +- .../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 51250 -> 0 bytes .../figure-html/unnamed-chunk-6-1.png | Bin 39186 -> 0 bytes .../figure-html/unnamed-chunk-6-1.svg | 119 -- .../figure-html/unnamed-chunk-6-2.png | Bin 84406 -> 0 bytes .../figure-html/unnamed-chunk-6-2.svg | 153 -- .../figure-html/unnamed-chunk-7-1.svg | 126 -- .../figure-html/unnamed-chunk-7-2.svg | 153 -- docs/07_testovani.html | 102 +- .../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 | 15 +- .../figure-html/unnamed-chunk-3-1 2.svg | 171 --- .../figure-html/unnamed-chunk-4-1 2.svg | 299 ---- .../figure-html/unnamed-chunk-5-1 2.svg | 336 ---- docs/11_korelace_regrese 2.html | 1243 --------------- docs/11_korelace_regrese.html | 2 +- .../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 | 836 +++++----- .../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 164 -> 0 bytes docs/data/budyko_dfr 2.rds | Bin 2154 -> 0 bytes docs/data/temp.csv | 103 ++ docs/include/webex 2.css | 120 -- docs/index 2.html | 828 ---------- docs/index.html | 2 +- docs/intro 2.html | 1057 ------------- docs/intro.html | 10 +- docs/search.json | 33 +- docs/style 2.css | 413 ----- intro.qmd | 2 + 86 files changed, 2298 insertions(+), 29347 deletions(-) create mode 100644 data/temp.csv delete mode 100644 docs/01_uvod_do_R_1 2.html delete mode 100644 docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1 2.dvi delete mode 100644 docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1 2.svg delete mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-12-1 2.svg delete mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-13-1 2.svg delete mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-14-1 2.svg delete mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-15-1 2.svg delete mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-17-1 2.svg delete mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-2-1 2.svg delete mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-3-1 2.svg delete mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-4-1 2.svg delete mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-5-1 2.svg delete mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-6-1 2.svg delete mode 100644 docs/03_grafy_files/figure-html/unnamed-chunk-8-1 2.svg delete mode 100644 docs/04_popisna_files/figure-html/unnamed-chunk-3-1 2.svg delete mode 100644 docs/04_popisna_files/figure-html/unnamed-chunk-6-1 2.svg delete mode 100644 docs/05_rozdeleni 2.html delete mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-10-1 2.svg delete mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-11-1 2.svg delete mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-12-1 2.svg delete mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-13-1 2.svg delete mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-17-1 2.svg delete mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-2-1 2.svg delete mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-4-1 2.svg delete mode 100644 docs/05_rozdeleni_files/figure-html/unnamed-chunk-9-1 2.svg delete mode 100644 docs/06_odhad 2.html delete mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-2-1 2.svg delete mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-2-1 3.svg delete mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-2-1 4.svg delete mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-2-1 5.svg delete mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-5-1.png delete mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-6-1.png delete mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-6-1.svg delete mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-6-2.png delete mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-6-2.svg delete mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-7-1.svg delete mode 100644 docs/06_odhad_files/figure-html/unnamed-chunk-7-2.svg delete mode 100644 docs/07_testovani_files/figure-html/unnamed-chunk-2-1 2.svg delete mode 100644 docs/09_casove_rady 2.html delete mode 100644 docs/09_casove_rady_files/figure-html/unnamed-chunk-3-1 2.svg delete mode 100644 docs/09_casove_rady_files/figure-html/unnamed-chunk-4-1 2.svg delete mode 100644 docs/09_casove_rady_files/figure-html/unnamed-chunk-5-1 2.svg delete mode 100644 docs/09_casove_rady_files/figure-html/unnamed-chunk-5-2 2.svg delete mode 100644 docs/09_casove_rady_files/figure-html/unnamed-chunk-7-1 2.svg delete mode 100644 docs/09_casove_rady_files/figure-html/unnamed-chunk-8-1 2.svg delete 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-4-1 2.svg delete mode 100644 docs/10_hydro_index_files/figure-html/unnamed-chunk-5-1 2.svg delete mode 100644 docs/11_korelace_regrese 2.html delete mode 100644 docs/11_korelace_regrese_files/figure-html/unnamed-chunk-11-1 2.svg delete mode 100644 docs/11_korelace_regrese_files/figure-html/unnamed-chunk-12-1 2.svg delete mode 100644 docs/11_korelace_regrese_files/figure-html/unnamed-chunk-3-1 2.svg delete mode 100644 docs/11_korelace_regrese_files/figure-html/unnamed-chunk-7-1 2.svg delete mode 100644 docs/11_korelace_regrese_files/figure-html/unnamed-chunk-9-1 2.svg delete mode 100644 docs/12_extremalni_rozdeleni 2.html delete mode 100644 docs/12_extremalni_rozdeleni_files/figure-html/unnamed-chunk-1-1 2.svg delete mode 100644 docs/data/.01138000 2.dly.icloud delete mode 100644 docs/data/budyko_dfr 2.rds create mode 100644 docs/data/temp.csv delete mode 100644 docs/include/webex 2.css delete mode 100644 docs/index 2.html delete mode 100644 docs/intro 2.html delete mode 100644 docs/style 2.css diff --git a/07_testovani.qmd b/07_testovani.qmd index fbf497b..dd4f750 100644 --- a/07_testovani.qmd +++ b/07_testovani.qmd @@ -1,10 +1,12 @@ # Testování hypotéz {#sec-testovani} -Testování statistikcké hypotézy je proces +Testování statistikcké hypotézy je proces, při kterém na základě dat pocházejících +z náhodného výběru ověřujeme úsudek o teoretickém souboru. + Zavádíme pojmy nulové $\mathrm{H}_0$ a alternativní hypotézy $\mathrm{H}_a$. + Pod *testováním hypotéz* potom rozumíme proces, který na základě -vlastností datové sady pocházející z náhodného výběru rozhodne o zamítnutí, -či nezamítnutí nulové hypotézy. +vlastností datové sady rozhodne o zamítnutí, či nezamítnutí nulové hypotézy. ::: callout-note ## Poznámka @@ -17,11 +19,11 @@ co se na sesbíraných datech snažíme vysledovat. ## Postup testování statistické hypotézy: -1. Formulace nulové $\mathrm{H}_0$ a alternativní $\mathrm{H}_a$ hypotézy.\ -2. Volba hladiny významnosti $\alpha$.\ -3. Volba testovací statistiky.\ -4. Určení kritického oboru testové statistiky. -5. Vyhodnocení testu s pomocí p-hodnoty. +1. Formulace nulové $\mathrm{H}_0$ a alternativní $\mathrm{H}_a$ hypotézy,\ +2. volba hladiny významnosti $\alpha$,\ +3. volba testovací statistiky,\ +4. určení kritického oboru testové statistiky,\ +5. vyhodnocení testu s pomocí p-hodnoty. Výsledkem testování je buď a) zamítnutní nulové hypotézy[^07_testovani-1] b) nezamítnutní nulové hypotézy. @@ -45,7 +47,8 @@ Výsledkem testování je buď a) zamítnutní nulové hypotézy[^07_testovani-1 ``` -Síla testu $\beta$ je pravěpodobnost, že je testem zamítnuta nulová hypotéza, která je skutečně neplatná. $P(\mathrm{H}_A|\mathrm{H}_A) = 1-\beta$ +Síla testu $\beta$ je pravěpodobnost, že je testem zamítnuta nulová hypotéza, +která je skutečně neplatná. $P(\mathrm{H}_A|\mathrm{H}_A) = 1-\beta$ ## $p-$hodnota @@ -59,6 +62,8 @@ Představme si, že hledáme odpověď na otázky typu: "Jaká je střední hodn ## $100(1-\alpha)\%$ interval spolehlivosti +Vrátíme se krátce k intervalu spolehlivosti z předchozí hodiny. + $$ \bar{x} - 1.96\dfrac{\sigma}{\sqrt{n}}\leq\mu\leq \bar{x} + 1.96\dfrac{\sigma}{\sqrt{n}} $$ @@ -80,83 +85,58 @@ Dejme tomu, že jsme v průběhu práce sesbírali následující hodnoty:\ `r set.seed(1450070); rnorm(10)`\ u procesu $X\sim\mathsf{N}(0; 1)$ ```{r, fig.align='center'} -set.seed(1450070) +set.seed(1450070) #<1> xd <- rnorm(10) curve(dnorm(x), from = -5, to = 5) rug(xd, lwd = 2) -segments(x0 = mean(xd), x1 = mean(xd), y0 = -0.2, y1 = dnorm(mean(xd)), lwd = 2, col = "orangered") +segments(x0 = mean(xd), + x1 = mean(xd), + y0 = -0.2, + y1 = dnorm(mean(xd)), + lwd = 2, + col = "orangered", + xlab = "", + ylab = "") ``` +1. V tomto příkladu potřebujeme vygenerovat specifické hodnoty, proto si určíme `set.seed()` -### Příklad 2 - - -Pravděpodobnost platnosti hypotézy - -## Testy dobré shody - -Testovací statistika testu dobré shody -$$ -\chi^2=\sum\dfrac{(O-E)^2}{E} -$$ - - - - - +Data jsme získali s pomocí generátoru pro náhodné rozdělení, budeme předpokládat, +že teoretický soubor má náhodné rozdělení s parametry $\mu=0$ a $\sigma^2=1$ a ověříme +na hladině významnosti $\alpha=0.05$. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +::: callout-note +## Úloha + + 1. Stanovte znění $\mathrm{H}_0$ a $\mathrm{H}_a$. + 2. Kolik bude stupňů volnosti? +::: +```{r} +t.test(xd, mu = 0) #<1> +``` +Z výsledku testu vyplývá, že `p-value` $< \alpha$, proto tedy musíme nulovou hypotézu - - - +### Příklad 2 - - - - - +V předchozím příkladu jsme testovali nulovou hypotézu oproti oboustranné alternativě, +tzn. neřešili jsme, zda je střední hodnota menší či větší. +::: callout-note +## Úloha + + 1. S pomocí nápovědy nastavte argumenty funkce `t.test()` tak, aby byla test proběhl + oproti jednostranné alternativě, že je skutečná střední hodnota nižší než 2. + 2. Studentův $t-$test lze použít za předpokladu, že data splňují tzv. normalitu. + tu lze pro tento soubor snadno ověřit jiným testem - `shapiro.test()`. $\mathrm{H}_0$: + rozdělení není odlišné od normálního. Zamítneme $\mathrm{H}_0$ na hladině významnosti $\alpha=0,1$? + 3. Zatím jsme použili jedovýběrový $t-$test na data pocházející z Normálního rozdělení. + V případě, že by naše data nesplňovala předpoklady kladené na tento parametrický test, + museli bychom volit neparametrickou variantu testu. Pro test hypotézy o střední + hodnotě lze využít neparametrický *Wilcoxonův test* - `wilcox.test()`. Rozhodněte + o volbě testu a proveďte s pomocí nápovědy test o rovnosti středních hodnot souborů + z datové sady **temp.csv**. + +::: diff --git a/data/temp.csv b/data/temp.csv new file mode 100644 index 0000000..a039676 --- /dev/null +++ b/data/temp.csv @@ -0,0 +1,103 @@ +"","T1","T2" +"1",16.58,16.33 +"2",16.73,16.34 +"3",16.93,16.35 +"4",17.15,16.42 +"5",17.23,16.55 +"6",17.24,16.69 +"7",17.24,16.71 +"8",16.9,16.75 +"9",16.95,16.81 +"10",16.89,16.88 +"11",16.95,16.89 +"12",17,16.91 +"13",16.9,16.85 +"14",16.99,16.89 +"15",16.99,16.89 +"16",17.01,16.67 +"17",17.04,16.5 +"18",17.04,16.74 +"19",17.14,16.77 +"20",17.07,16.76 +"21",16.98,16.78 +"22",17.01,16.82 +"23",16.97,16.89 +"24",16.97,16.99 +"25",17.12,16.92 +"26",17.13,16.99 +"27",17.14,16.89 +"28",17.15,16.94 +"29",17.17,16.92 +"30",17.12,16.97 +"31",17.12,16.91 +"32",17.17,16.79 +"33",17.28,16.77 +"34",17.28,16.69 +"35",17.44,16.62 +"36",17.51,16.54 +"37",17.64,16.55 +"38",17.51,16.67 +"39",17.98,16.69 +"40",18.02,16.62 +"41",18,16.64 +"42",18.24,16.59 +"43",18.1,16.65 +"44",18.24,16.75 +"45",18.11,16.8 +"46",18.02,16.81 +"47",18.11,16.87 +"48",18.01,16.87 +"49",17.91,16.89 +"50",17.96,16.94 +"51",18.03,16.98 +"52",18.17,16.95 +"53",18.19,17 +"54",18.18,17.07 +"55",18.15,17.05 +"56",18.04,17 +"57",17.96,16.95 +"58",17.84,17 +"59",17.83,16.94 +"60",17.84,16.88 +"61",17.74,16.93 +"62",17.76,16.98 +"63",17.76,16.97 +"64",17.64,16.85 +"65",17.63,16.92 +"66",18.06,16.99 +"67",18.19,17.01 +"68",18.35,17.1 +"69",18.25,17.09 +"70",17.86,17.02 +"71",17.95,16.96 +"72",17.95,16.84 +"73",17.76,16.87 +"74",17.6,16.85 +"75",17.89,16.85 +"76",17.86,16.87 +"77",17.71,16.89 +"78",17.78,16.86 +"79",17.82,16.91 +"80",17.76,17.53 +"81",17.81,17.23 +"82",17.84,17.2 +"83",18.01,17.25 +"84",18.1,17.2 +"85",18.15,17.21 +"86",17.92,17.24 +"87",17.64,17.1 +"88",17.7,17.2 +"89",17.46,17.18 +"90",17.41,16.93 +"91",17.46,16.83 +"92",17.56,16.93 +"93",17.55,16.83 +"94",17.75,16.8 +"95",17.76,16.75 +"96",17.73,16.71 +"97",17.77,16.73 +"98",18.01,16.75 +"99",18.04,16.72 +"100",18.07,16.76 +"101",NA,16.7 +"102",NA,16.82 diff --git a/docs/01_uvod_do_R_1 2.html b/docs/01_uvod_do_R_1 2.html deleted file mode 100644 index f741c51..0000000 --- a/docs/01_uvod_do_R_1 2.html +++ /dev/null @@ -1,932 +0,0 @@ - - - - - - - - - -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 395f9fd..118283b 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,] 6.663615 122.7062 612.4235 1.463653 11.72349 15.54336 277.8602 1.877454
+
         [,1]     [,2]     [,3]     [,4]     [,5]       [,6]     [,7]     [,8]
+[1,] 418.2779 46.00991 898.1805 66.07044 161.6351 0.08361656 79.08682 24.76843
          [,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 
+[1,] 257.3706 1230.501
+         A          F          H          I          J 
+20.4518433  0.2891653  4.9767891 16.0427731 35.0784996 
          A          B          C 
- -2.581398  11.077285 -24.747191 

+ 20.451843  -6.783061 -29.969659
@@ -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
@@ -1065,12 +1065,12 @@ 

DF <- data.frame(name = letters[1:5], 
                  value = rnorm(5))
 DF
-##   name      value
-## 1    a  0.5001322
-## 2    b -0.4163139
-## 3    c -1.1695121
-## 4    d  1.6076695
-## 5    e -0.1154482
+##   name       value
+## 1    a  1.12780592
+## 2    b  0.40404050
+## 3    c  0.19324584
+## 4    d -0.95829378
+## 5    e  0.04486513
 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  -1.77 1.08 -2.406 -0.258 2.643 ...
+##  $ value: num  1.0997 -0.7848 -0.0111 -0.4826 -0.6116 ...
 ##  $ 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.01184226

+
Hodnota nejblíže 0 z vektoru x je: -0.001569647

 

 
 
@@ -1367,16 +1367,16 @@ 

 
    
 
  1. Zvolte platné tvrzení pro data.frame:
-
    
-
+
    
+
 
    2. 
 
  2. Matici je možné vytvořit z vektoru přidáním dimenze: 
    
 
    3. 
 
  3. Co je výsledkem výrazu: \(\sin(\frac{0}{0})\) 
    
 
    4. 
 
  4. Vyberte, platné tvrzení pro list:
-
    
-
+
    
+
 
    5. 
 
  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
deleted file mode 100644
index 01443def3195aef3f9a510436f8825ef943c13e8..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

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

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
deleted file mode 100644
index bf3a58b..0000000
--- a/docs/02_uvod_do_R_2_files/figure-html/unnamed-chunk-11-1 2.svg	
+++ /dev/null
@@ -1,196 +0,0 @@
-
-
-
-
-
-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 2ff252972d342142dfa8c7b0e0a770c76aa74f49..44ac5cb9afa8631de9e4b227e9f8246f860bf9a1 100644
GIT binary patch
delta 27
jcmdn6o_WK1<_Rj?7FLEPMkd`13=E7D4V5+q#$N{jd5s8Z

delta 27
jcmdn6o_WK1<_Rj?Mpg#qh8Eon3=E7D4V5+q#$N{jd1MG^

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 e9fa9d9..a6f784b 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 @@