title: “Práca s RMarkdown” author: “Natalia Nadaska” date: “September
2025” output: html_notebook: toc: true toc_float: true theme: united
highlight: tango editor_options: markdown: wrap: 72 —
knitr::opts_chunk$set(echo = TRUE)
Textová časť s formátovaním (Markdown Syntax)
Kurzíva a tučné písmo:
- Kurzíva sa robí ako
*Kurzíva* alebo
_Kurzíva_
- Tučné písmo sa robí ako
**Tučné**
alebo __Tučné__
- Tučné a kurzíva sa robí ako
***takto***, ___Tučné a kurzíva___
Inline kód: Tento text obsahuje inline kód.
Dolný a horný index: Dolný2 a horný2 index sa
vytvárajú ako Dolný~2~ alebo horný^2^
Prečiarknutie: Prečiarknutý text sa robí
~~Prečiarknutý text~~
Zoznamy:
Nečíslovaný zoznam krajín: * Slovensko * Česko * Maďarsko
Číslovaný zoznam krajín: 1. Slovensko 2. Česko 3. Maďarsko
Zalamovanie riadkov: Roses are red.
Violets are blue.
Hyperlinky: Toto je hypertextový
odkaz
Poznámky pod čiarou: Vytvárajú sa tak, že buď napíšeš ^[moja poznámka pod
čiarou] priamo do textu.
Komentáre v dokumente (HTML syntax):
Matematika (v textovej časti a blokoch): $A = \pi*r^{2}$
Matematika v bloku (Rovnice v samostatnom riadku): \[A = \pi*r^{2}\]
Tabuľky: | Krajina | Hlavné mesto | Teplota | |—————|:————–:|——–:| |
Slovensko | Bratislava | 10 | | Česko | Praha | 5 | | Maďarsko |
Budapešť | 8 |
Vkladanie obrázkov: 
R kód pre základné štatistiky a výpočty (RChunk):
Vytvorenie vektora a výpočet základných štatistík:
data <- c(1, 2, 3, 4, 5)
mean(data) # Výpočet priemeru
[1] 3
sd(data) # Výpočet štandardnej odchýlky
[1] 1.581139
Vytvorenie tabuľky a jej zobrazenie:
library(knitr)
# Vytvorenie dát pre tabuľku
countries_data <- data.frame(
Krajina = c("Slovensko", "Česko", "Maďarsko"),
Hlavné_mesto = c("Bratislava", "Praha", "Budapešť"),
Teplota = c(10, 5, 8)
)
# Zobrazenie tabuľky
kable(countries_data)
| Krajina |
Hlavné_mesto |
Teplota |
| Slovensko |
Bratislava |
10 |
| Česko |
Praha |
5 |
| Maďarsko |
Budapešť |
8 |
NA
Vykreslenie grafu (napr. graf pre teploty v krajinách):
library(ggplot2)
ggplot(countries_data, aes(x = Krajina, y = Teplota)) +
geom_bar(stat = "identity") +
theme_minimal() +
labs(title = "Teploty v krajinách", x = "Krajina", y = "Teplota (°C)")

LS0tCnRpdGxlOiAiUiBOb3RlYm9vayIKb3V0cHV0OiBodG1sX25vdGVib29rCi0tLQp0aXRsZTogIlByw6FjYSBzIFJNYXJrZG93biIKYXV0aG9yOiAiTmF0YWxpYSBOYWRhc2thIgpkYXRlOiAiU2VwdGVtYmVyIDIwMjUiCm91dHB1dDogCiAgaHRtbF9ub3RlYm9vazoKICAgIHRvYzogdHJ1ZQogICAgdG9jX2Zsb2F0OiB0cnVlCiAgICB0aGVtZTogdW5pdGVkCiAgICBoaWdobGlnaHQ6IHRhbmdvCmVkaXRvcl9vcHRpb25zOiAKICBtYXJrZG93bjogCiAgICB3cmFwOiA3MgotLS0KYGBge3J9CmtuaXRyOjpvcHRzX2NodW5rJHNldChlY2hvID0gVFJVRSkKCmBgYApUZXh0b3bDoSDEjWFzxaUgcyBmb3Jtw6F0b3ZhbsOtbSAoTWFya2Rvd24gU3ludGF4KQoKS3VyesOtdmEgYSB0dcSNbsOpIHDDrXNtbzoKCi0gKkt1cnrDrXZhKiBzYSByb2LDrSBha28gYCpLdXJ6w612YSpgIGFsZWJvIGBfS3VyesOtdmFfYAotICoqVHXEjW7DqSoqIHDDrXNtbyBzYSByb2LDrSBha28gYCoqVHXEjW7DqSoqYCBhbGVibyBgX19UdcSNbsOpX19gCi0gKipfVHXEjW7DqSBhIGt1cnrDrXZhXyoqIHNhIHJvYsOtIGFrbyBgKioqdGFrdG8qKipgLCBgX19fVHXEjW7DqSBhIGt1cnrDrXZhX19fYAoKSW5saW5lIGvDs2Q6ClRlbnRvIHRleHQgb2JzYWh1amUgYGlubGluZSBrw7NkYC4KCkRvbG7DvSBhIGhvcm7DvSBpbmRleDoKRG9sbsO9fjJ+IGEgaG9ybsO9XjJeIGluZGV4IHNhIHZ5dHbDoXJhasO6IGFrbyBgRG9sbsO9fjJ+YCBhbGVibyBgaG9ybsO9XjJeYAoKUHJlxI1pYXJrbnV0aWU6Cn5+UHJlxI1pYXJrbnV0w70gdGV4dH5+IHNhIHJvYsOtIGB+flByZcSNaWFya251dMO9IHRleHR+fmAKClpvem5hbXk6CgpOZcSNw61zbG92YW7DvSB6b3puYW0ga3JhasOtbjoKKiBTbG92ZW5za28KKiDEjGVza28KKiBNYcSPYXJza28KCsSMw61zbG92YW7DvSB6b3puYW0ga3JhasOtbjoKMS4gU2xvdmVuc2tvCjIuIMSMZXNrbwozLiBNYcSPYXJza28KClphbGFtb3ZhbmllIHJpYWRrb3Y6ClJvc2VzIGFyZSByZWQuICAKVmlvbGV0cyBhcmUgYmx1ZS4KCkh5cGVybGlua3k6CltUb3RvIGplIGh5cGVydGV4dG92w70gb2RrYXpdKGh0dHBzOi8vd3d3Lmdvb2dsZS5jb20pCgpQb3puw6Fta3kgcG9kIMSNaWFyb3U6ClZ5dHbDoXJhasO6IHNhXlttb2phIHBvem7DoW1rYSBwb2QgxI1pYXJvdV0gdGFrLCDFvmUgYnXEjyBuYXDDrcWhZcWhIFxeW21vamEgcG96bsOhbWthIHBvZCDEjWlhcm91XSBwcmlhbW8gZG8gdGV4dHUuCgpLb21lbnTDoXJlIHYgZG9rdW1lbnRlIChIVE1MIHN5bnRheCk6CjwhLS0gS29tZW50w6FyZSBzw7ogdmXEvm1pIHXFvml0b8SNbsOpISAtLT4KCk1hdGVtYXRpa2EgKHYgdGV4dG92ZWogxI1hc3RpIGEgYmxva29jaCk6ClwkQSA9IFxccGkqcl57Mn1cJAoKTWF0ZW1hdGlrYSB2IGJsb2t1IChSb3ZuaWNlIHYgc2Ftb3N0YXRub20gcmlhZGt1KToKJCRBID0gXHBpKnJeezJ9JCQKClRhYnXEvmt5Ogp8IEtyYWppbmEgICAgICAgfCBIbGF2bsOpIG1lc3RvICAgfCBUZXBsb3RhIHwKfC0tLS0tLS0tLS0tLS0tLXw6LS0tLS0tLS0tLS0tLS06fC0tLS0tLS0tOnwKfCBTbG92ZW5za28gICAgIHwgQnJhdGlzbGF2YSAgICAgfCAxMCAgICAgIHwKfCDEjGVza28gICAgICAgICB8IFByYWhhICAgICAgICAgIHwgNSAgICAgICB8CnwgTWHEj2Fyc2tvICAgICAgfCBCdWRhcGXFocWlICAgICAgIHwgOCAgICAgICB8CgpWa2xhZGFuaWUgb2Jyw6F6a292OgohW015c2xpYWNpIEFyaXN0b3RlbGVzXShvYnJhemt5L1RoaW5raW5nQXJpc3RvdGVsZXMuanBlZykKClIga8OzZCBwcmUgesOha2xhZG7DqSDFoXRhdGlzdGlreSBhIHbDvXBvxI10eSAoUkNodW5rKToKClZ5dHZvcmVuaWUgdmVrdG9yYSBhIHbDvXBvxI1ldCB6w6FrbGFkbsO9Y2ggxaF0YXRpc3TDrWs6CmBgYHtyfQpkYXRhIDwtIGMoMSwgMiwgMywgNCwgNSkKbWVhbihkYXRhKSAgIyBWw71wb8SNZXQgcHJpZW1lcnUKc2QoZGF0YSkgICAgIyBWw71wb8SNZXQgxaF0YW5kYXJkbmVqIG9kY2jDvWxreQoKYGBgClZ5dHZvcmVuaWUgdGFidcS+a3kgYSBqZWogem9icmF6ZW5pZToKYGBge3J9CmxpYnJhcnkoa25pdHIpCgojIFZ5dHZvcmVuaWUgZMOhdCBwcmUgdGFidcS+a3UKCmNvdW50cmllc19kYXRhIDwtIGRhdGEuZnJhbWUoCktyYWppbmEgPSBjKCJTbG92ZW5za28iLCAixIxlc2tvIiwgIk1hxI9hcnNrbyIpLApIbGF2bsOpX21lc3RvID0gYygiQnJhdGlzbGF2YSIsICJQcmFoYSIsICJCdWRhcGXFocWlIiksClRlcGxvdGEgPSBjKDEwLCA1LCA4KQopCgojIFpvYnJhemVuaWUgdGFidcS+a3kKCmthYmxlKGNvdW50cmllc19kYXRhKQoKYGBgClZ5a3Jlc2xlbmllIGdyYWZ1IChuYXByLiBncmFmIHByZSB0ZXBsb3R5IHYga3Jhamluw6FjaCk6CmBgYHtyfQpsaWJyYXJ5KGdncGxvdDIpCmdncGxvdChjb3VudHJpZXNfZGF0YSwgYWVzKHggPSBLcmFqaW5hLCB5ID0gVGVwbG90YSkpICsKZ2VvbV9iYXIoc3RhdCA9ICJpZGVudGl0eSIpICsKdGhlbWVfbWluaW1hbCgpICsKbGFicyh0aXRsZSA9ICJUZXBsb3R5IHYga3Jhamluw6FjaCIsIHggPSAiS3JhamluYSIsIHkgPSAiVGVwbG90YSAowrBDKSIpCgpgYGAKCgo=