Základné operácie v Rku

Parametre

a<-5
b<-4
a
b

(a+b)^2
x<-(a+b)^2

Logické hodnoty

a<-TRUE
b<-TRUE
a
b

(a|b)
(a&b)
(!a|b)

##Umocňovanie

(15^2 - 4) / 7

[1] 31.57143

Textové premenné

first <- "Barbora"                       
last  <- "Capeková"                          
full  <- paste(first, last)               
full_nospace <- paste0(first, last)       
csv_line <- paste("carrot", "tomato", "cabbage", sep = ",")   ,
first; last; full; full_nospace; csv_line   

Dĺžka textového reťazca, podreťazec

x <- "Today is Friday!"
nchar(x)                 
substr(x, 2, 7)          

Logické (boolovské) hodnoty a premenné

Základy

a<-TRUE
b<-TRUE
a
b

(a|b)
(a&b)
(!a|b)

## Zložitejšie logické operácie

y <- 20
y > 6 & y < 30      
y < 9 | y > 50     
                    

Zlučovanie viacerých log. premenných do vektora

values <- c(TRUE, FALSE, FALSE, TRUE)   

Numerické vektory

Generovanie vektorov

v1 <- c(1, 3, 5, 9)
v2 <- 2:7                  
v3 <- seq(from = 2, to = 6, by = 0.5)  
v4 <- rep(5, times = 8)    
v5 <- runif(6)             
v6 <- rnorm(4)             
v1; v2; v3; v4; v5; v6

Aritmetické operácie s vektormi

v <- c(2, 4, 6, 8)
v + 15         
v * 4            
(v + 2) / 2
exp(v)        
sum(c(2,2,2),c(1,3,5))          
c(2,4,6)*c(3,2,1)              

Indexovanie a výber niektorych prvkov vektora

x <- c(2, 4, 6, 8, 10, 12, 14)
x[3]           
x[3:6]         
x[-6]        
x[x > 15]      
which(x > 15)  

Práca s chýbajúcimi hodnotami

x <- c(2, NA, 4, NA, 6)
is.na(x)
mean(x)                 
mean(x, na.rm = TRUE)   

Základné štatistiky a usporiadanie prvkov vektora podľa veľkosti

w <- 1:20
sum(w[w %% 2 == 0])

[1] 110

Malé cvičenie

Vytvorte vektor w s číslami 1..20 a vypočítajte sumu všetkých párnych čísel.

w <- 1:20
sum(w[w %% 2 == 0])

#Riešenie
110

Matice

Vytvorenie matíc

m <- matrix(1:16, nrow = 4, ncol = 4)            
m_byrow <- matrix(1:16, nrow = 4, byrow = TRUE)  
m; m_byrow

Rozmery matice

dim(m)                  
m

Adresovanie prvkov matice

m[2, 4]      
m[ , 2]      
m[1, ]       
m[2:3, 3:4]  

Maticové operácie

M2 <- matrix(1:25, nrow = 5, byrow = TRUE)
colSums(M2)

[1] 55 60 65 70 75

t(M2) %*% M2

     [,1] [,2] [,3] [,4] [,5]
[1,]  855  910  965 1020 1075
[2,]  910  970 1030 1090 1150
[3,]  965 1030 1095 1160 1225
[4,] 1020 1090 1160 1230 1300
[5,] 1075 1150 1225 1300 1375

Malé cvičenie

Vytvorte maticu 5x5 s hodnotami po riadkoch 1..25, vypočítajte stĺpcové sumy a súčin matíc \(M^t M\).

numbers <- 1:50
sample(numbers, 5)   # vyberie 5 náhodných čísel z 1..50

[1]  2  7 45 38 21

##Moj návrh novinky

# Funkcia sample() – náhodný výber prvkov z vektora
numbers <- 1:50
sample(numbers, 5)   # vyberie 5 náhodných čísel z 1..50

---

This is an R Markdown Notebook. When you execute code within the notebook, the results appear beneath the code.

Try executing this chunk by clicking the Run button within the chunk or by placing your cursor inside it and pressing Ctrl+Shift+Enter.

plot(cars)

Add a new chunk by clicking the Insert Chunk button on the toolbar or by pressing Ctrl+Alt+I.

When you save the notebook, an HTML file containing the code and output will be saved alongside it (click the Preview button or press Ctrl+Shift+K to preview the HTML file).

The preview shows you a rendered HTML copy of the contents of the editor. Consequently, unlike Knit, Preview does not run any R code chunks. Instead, the output of the chunk when it was last run in the editor is displayed.