#Menyimoan data dalam variabel fungsi c

simpan = c(10, 20, 40, 15, 40)
simpan
## [1] 10 20 40 15 40
simpan[3]
## [1] 40
simpan[4]
## [1] 15
simpan[c(1,3,4)]
## [1] 10 40 15
simpan[2:4]
## [1] 20 40 15

#Menghapus data

NILAI = c(10, 40, 45, 30, 80)
NILAI = NILAI[-3]
NILAI
## [1] 10 40 30 80
NILAI = c(10, 40, 45, 30, 80)
NILAI = NILAI[-4]
NILAI
## [1] 10 40 45 80
NILAI = c(10, 40, 45, 30, 80)
NILAI = NILAI[c(-1,-3)]
NILAI
## [1] 40 30 80

#Operator > (lebih besar)

NILAI = c(100, 95, 70, 80, 25, 60, 80, 60, 55, 90)
NILAI[NILAI > 80]
## [1] 100  95  90

#Operator < (lebih kecil)

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

#Operator & (dan)

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

#Operator | (atau)

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

#Menghapus nilai ≥ 75

NILAI=NILAI[NILAI<75]

#Penggunaan Lanjutan >

NILAI=NILAI[NILAI>90]

#Function

fungsi=function(x)
{
  for(i in 1 : length(x))
  {
    if(x[i]<65)
    {
      x[i]=x[i]+10;
    }
    print(x[i])
  }
}
A=c(100, 95, 70, 80, 25, 60, 80, 60, 55, 90)
fungsi(A)
## [1] 100
## [1] 95
## [1] 70
## [1] 80
## [1] 35
## [1] 70
## [1] 80
## [1] 70
## [1] 65
## [1] 90