鈻讹笍 Tematyka

  • Funkcje i operacje matematyczne
  • Funkcje i operacje statystyczne
  • Funkcje u偶ytkownika


馃摌 Funkcje i operacje matematyczne i statystyczne

x=c(-2,4,6,10,-3)
y=c(7,5,-12,4,-1)

pmin(x,y)
## [1]  -2   4 -12   4  -3
pmax(x,y)
## [1]  7  5  6 10 -1
sum(x)
## [1] 15
mean(x)
## [1] 3
abs(x)
## [1]  2  4  6 10  3
min(x)
## [1] -3
max(x)
## [1] 10
median(x)
## [1] 4
quantile(x)
##   0%  25%  50%  75% 100% 
##   -3   -2    4    6   10
quantile(x,c(0.75))
## 75% 
##   6
quantile(x,seq(0.1,0.9,0.1))
##  10%  20%  30%  40%  50%  60%  70%  80%  90% 
## -2.6 -2.2 -0.8  1.6  4.0  4.8  5.6  6.8  8.4
wariancja=sum((x-mean(x))^2)/length(x)
wariancja
## [1] 24
wariancja_s=sum((x-mean(x))^2)/(length(x)-1)
wariancja_s
## [1] 30
var(x)
## [1] 30
odch_st=sqrt(wariancja)
odch_st
## [1] 4.898979
odch_st_s=sqrt(wariancja_s)
odch_st_s
## [1] 5.477226
o_st=sd(x)
o_st
## [1] 5.477226
x=c(23,NA,2,-12,32)
mean(x)
## [1] NA
mean(x,na.rm=TRUE)
## [1] 11.25
#Dzielenie modulo.
10%%2
## [1] 0
10%%4
## [1] 2

馃摌 Funkcje u偶ytkownika

# Konstrukcja funkcji obliczaj膮cej i zwracaj膮cej sum臋 liczb.

suma=function(a,b){
a+b
}

suma(3,5)   #Suma liczb 3 i 5, gdzie a=3 i b=5.
## [1] 8
# Poni偶szy kod nie zwr贸ci wyniku.

suma=function(a,b){
s=a+b
}
suma(3,5)
# s 
# Obiekt s nie jest zwracany, bo istnieje w funkcji, 
# ale nie w przestrzeni nazw, obiekt贸w R.

# Funkcja return pozwala na zwracanie wyniku.

suma=function(a,b){
s=a+b
return(s)
}
suma(3,5)
## [1] 8

Wyniki zaleca si臋 zapisa膰 na li艣cie

suma=function(a,b){
s=a+b
list(suma=s)
}
suma(3,5)
## $suma
## [1] 8
# Funkcja u偶ytkowanika zwracaj膮ca sum臋, r贸偶nic臋, iloczyn, iloraz i pot臋g臋 liczb.

matma=function(a,b){
s=a+b
r=a-b
il=a/b
ilocz=a*b
p=a^b

list(suma=s,r贸偶nica=r,iloraz=il,iloczyn=ilocz,pot臋ga=p)
}

matma(4,3)
## $suma
## [1] 7
## 
## $r贸偶nica
## [1] 1
## 
## $iloraz
## [1] 1.333333
## 
## $iloczyn
## [1] 12
## 
## $pot臋ga
## [1] 64
# Wy艣wietlenie iloczynu liczb.
matma(4,3)$iloczyn
## [1] 12
matma(4,3)[4]
## $iloczyn
## [1] 12
matma(4,3)[[4]]
## [1] 12
# Obliczenia w funkcji "matma" mo偶na wykona膰  
# nie tylko dla pojedynczych warto艣ci, ale i dla wektor贸w.

x=1:5
y=c(2,5,1,3,2)
matma(x,y)
## $suma
## [1] 3 7 4 7 7
## 
## $r贸偶nica
## [1] -1 -3  2  1  3
## 
## $iloraz
## [1] 0.500000 0.400000 3.000000 1.333333 2.500000
## 
## $iloczyn
## [1]  2 10  3 12 10
## 
## $pot臋ga
## [1]  1 32  3 64 25
# Funkcja zwracaj膮ca 4 najwi臋ksze warto艣ci z wektora liczb.

x=1:20

najwi臋ksze=function(a){
s=sort(a,decreasing=T)  #Dane sortowane s膮 malej膮co.
s[1:4]  #Z danych posortowanych malej膮co wybierane s膮 4 pierwsze warto艣ci.
}

najwi臋ksze(x)
## [1] 20 19 18 17
# Funkcja u偶ytkownika, kt贸ra zwraca 
# warto艣膰 minimaln膮, maksymaln膮, 艣redni膮, 
# odchylenie 膰wiartkowe i wsp贸艂czynnik asymetrii Yule'a Kendall'a.

f=function(a){
m=min(a)
mx=max(a)
s=mean(a)
o=sd(a)
q1=quantile(a,0.25)[[1]]
q2=quantile(a,0.5)[[1]]
q3=quantile(a,0.75)[[1]]
w=((q3-q2)-(q2-q1))/(q3-q1)

list(minimum=m,maksimum=mx,艣rednia=s,odchylenie_膰wiartkowe=o,wsp_asymetrii=w)
}
wektor=c(12,3,4,65,32)
f(wektor)
## $minimum
## [1] 3
## 
## $maksimum
## [1] 65
## 
## $艣rednia
## [1] 23.2
## 
## $odchylenie_膰wiartkowe
## [1] 26.10939
## 
## $wsp_asymetrii
## [1] 0.4285714

Warto艣ci domy艣lne funkcji u偶ytkownika

obliczenia=function(a=99,b=12){ #W tej linijce s膮 definiowane warto艣ci domy艣lne argument贸w a i b.

s=a+b
r=a-b
il=a/b
ilocz=a*b
p=a^b
list(suma=s,r贸偶nica=r,iloraz=il,iloczyn=ilocz,pot臋ga=p)
}

obliczenia(b=3) #Funkcja u偶ytkownika zostanie wykonana dla a=99 (warto艣膰 domy艣lna) i b=3.
## $suma
## [1] 102
## 
## $r贸偶nica
## [1] 96
## 
## $iloraz
## [1] 33
## 
## $iloczyn
## [1] 297
## 
## $pot臋ga
## [1] 970299
obliczenia(23)  #Funkcja u偶ytkownika zostanie wykonana dla a=23 i b=12 (warto艣膰 domy艣lna). 23 stoi na pierwszym miejscu i zosta艂o potraktowane jako a, poniewa偶 a znajduje si臋 na 1 miejscu w zapisie function().
## $suma
## [1] 35
## 
## $r贸偶nica
## [1] 11
## 
## $iloraz
## [1] 1.916667
## 
## $iloczyn
## [1] 276
## 
## $pot臋ga
## [1] 2.191462e+16
obliczenia(3,4)
## $suma
## [1] 7
## 
## $r贸偶nica
## [1] -1
## 
## $iloraz
## [1] 0.75
## 
## $iloczyn
## [1] 12
## 
## $pot臋ga
## [1] 81