#Menyimpan Data dalam Variabel (Fungsi C)
simpan = c(10, 20, 40, 15, 40)
simpan
## [1] 10 20 40 15 40
#Mengakses Nilai Data dalam Variabel secara Individual
simpan [3]
## [1] 40
simpan [4]
## [1] 15
simpan[c(1,3,4)]
## [1] 10 40 15
simpan[2:4]
## [1] 20 40 15
#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
## [1] 10 40 30
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
# Gambar 2.27
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
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
NILAI = c(100, 95, 70, 80, 25, 60, 80, 60, 55, 90)
NILAI = NILAI[NILAI < 75]
NILAI
## [1] 70 25 60 60 55
NILAI = c(100, 95, 70, 80, 25, 60, 80, 60, 55, 90)
NILAI = NILAI[NILAI > 90]
NILAI
## [1] 100 95
# Gambar 2.35
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