data <- c(5,7,6,8,1,2,4)
data[5]
## [1] 1
data[c(1,3,5)]
## [1] 5 6 1
data[4:7]
## [1] 8 1 2 4
data[3] = 9
data
## [1] 5 7 9 8 1 2 4
#mengubah data ke-3
data[3] = 9

data[8] = 3

#menampilkan data kurang dari 5
data[-5]
## [1] 5 7 9 8 2 4 3
data[data>4]
## [1] 5 7 9 8
#menampilkan data dibawah 5
data[data<5]
## [1] 1 2 4 3
#menapilkan dua data jika kedua datanya true
data[data>7|data<4]
## [1] 9 8 1 2 3