Základné operácie v R - Malé cvičenia

Author

Študent

Published

January 1, 2026

Globálne nastavenie Chunkov

Code

knitr::opts_chunk$set(
  echo = TRUE,
  message = FALSE,
  warning = FALSE
)

Skaláre (jednočíselné hodnoty)

Malé cvičenie

Code

(10^3 + 50) / 5

[1] 210

Code

round(15.789)

[1] 16

Text

Malé cvičenie

Code

meno <- "Jan"
priezvisko <- "Hrasko"
cele_meno <- paste(meno, priezvisko)
cele_meno

[1] "Jan Hrasko"

Code

nchar(cele_meno)

[1] 10

Logické (boolovské) hodnoty a premenné

Malé cvičenie

Code

x <- 25
(x > 10) & (x <= 30)

[1] TRUE

Code

"jablko" != "hruska"

[1] TRUE

Numerické vektory

Malé cvičenie

Code

v <- 1:15
v_vyber <- v[v > 10]
v_vyber

[1] 11 12 13 14 15

Code

sum(v_vyber)

[1] 65

Matice

Malé cvičenie

Code

mat <- matrix(1:16, nrow = 4, byrow = TRUE)
mat

     [,1] [,2] [,3] [,4]
[1,]    1    2    3    4
[2,]    5    6    7    8
[3,]    9   10   11   12
[4,]   13   14   15   16

Code

rowSums(mat)

[1] 10 26 42 58

Code

mat %*% t(mat)

     [,1] [,2] [,3] [,4]
[1,]   30   70  110  150
[2,]   70  174  278  382
[3,]  110  278  446  614
[4,]  150  382  614  846

---
title: "Základné operácie v R - Malé cvičenia"
author: "Študent"
date: "Október 2026"
format:
  html:
    toc: true
    toc-location: left
    theme: united
    highlight-style: tango
    embed-resources: true
    code-fold: show
    code-tools: true
editor:
  markdown:
    wrap: 72
---

# Globálne nastavenie Chunkov

```{r}
#| label: setup
#| include: true
#| echo: true
knitr::opts_chunk$set(
  echo = TRUE,
  message = FALSE,
  warning = FALSE
)
```

# Skaláre (jednočíselné hodnoty)

## Malé cvičenie

```{r}
(10^3 + 50) / 5
round(15.789)
```

# Text 

## Malé cvičenie

```{r}
meno <- "Jan"
priezvisko <- "Hrasko"
cele_meno <- paste(meno, priezvisko)
cele_meno
nchar(cele_meno)
```

# Logické (boolovské) hodnoty a premenné

## Malé cvičenie

```{r}
x <- 25
(x > 10) & (x <= 30)
"jablko" != "hruska"
```

# Numerické vektory

## Malé cvičenie

```{r}
v <- 1:15
v_vyber <- v[v > 10]
v_vyber
sum(v_vyber)
```

# Matice

## Malé cvičenie

```{r}
mat <- matrix(1:16, nrow = 4, byrow = TRUE)
mat
rowSums(mat)
mat %*% t(mat)
```