# bab 2 #
# fungsi dalam r #

### menyimpan data dalam r ###

simpan = c (10,20,40,15,40)
simpan 
## [1] 10 20 40 15 40
### mengakses nilai data dalam variabel secara individual ###

simpan = c (10,20,40,15,40)
simpan[3]
## [1] 40
### mengubah nilai data dalam variabel ###

simpan = c (10,20,40,15,40)
simpan
## [1] 10 20 40 15 40
simpan[3] =100
simpan[4] =10000
simpan
## [1]    10    20   100 10000    40
### menghapus nilai data dalam variabel ###

NILAI=c (10,40,45,30,80)
NILAI
## [1] 10 40 45 30 80
NILAI=NILAI[-3]
NILAI
## [1] 10 40 30 80
NILAI=NILAI[-4]
NILAI
## [1] 10 40 30
NILAI=NILAI[c(-1,-3)]
NILAI
## [1] 40
### penggunaan operator lebih kecil dari ###

NILAI=c(100, 95, 70, 80, 25, 60, 80, 60, 55, 90)
NILAI
##  [1] 100  95  70  80  25  60  80  60  55  90
NILAI[NILAI<70]
## [1] 25 60 60 55
### penggunaan operator dan ###

NILAI=c(100,95,70,80,25,60,80,60,55,90)
NILAI
##  [1] 100  95  70  80  25  60  80  60  55  90
NILAI[NILAI>60&NILAI<80]
## [1] 70
### penggunaan operator atau ###

NILAI=c(100,95,70,80,25,60,80,60,55,90)
NILAI
##  [1] 100  95  70  80  25  60  80  60  55  90
NILAI[NILAI>80 | NILAI<30]
## [1] 100  95  25  90
### fungsi barplot ###

A=c(10,10,10,10,20,20,30,30,30,30,30,30)

barplot(table(A))

barplot(table(A)/length(A))

### fungsi plot ###

A=c(10,10,10,10,10,20,20,20,30,30,40)
table(A)
## A
## 10 20 30 40 
##  5  3  2  1
nilai=c(10,20,30,40)
frekuensi=c(5,3,2,1)
plot(nilai,frekuensi)

A=c(10,10,10,10,10,20,20,20,30,30,40)
plot(table(A))