# Data
data_ongkir <- data.frame(
  Produk = rep(c("Elektronik", "Pakaian", "Kosmetik", "Buku", "Makanan"), each = 2),
  Kota = rep(c("A", "B"), times = 5),
  Ongkir = c(28, 25, 20, 22, 5, 18, 16, 17, 14, 13)
)