# Membuat data produk produk <- data.frame( kode = c(101, 103, 105, 106, 108, 110), nama = c("Buku", "Pensil", "Pulpen", "Penghapus", "Tas", "Penggaris"), harga = c(15000, 2000, 3000, 1000, 75000, 5000) )