fork download
  1. # Simulasi isi data dari file tiket_pesawat.csv
  2. isi_csv <- "ID_Transaksi,Maskapai,Rute,Jumlah_Tiket,Harga_Tiket
  3. 1,Garuda,Jakarta-Bali,20,1500000
  4. 2,Lion Air,Jakarta-Surabaya,15,900000
  5. 3,AirAsia,Jakarta-Medan,10,1200000
  6. 4,Citilink,Jakarta-Lombok,8,1100000"
  7.  
  8. # Membaca data ke dalam objek tiket_pesawat
  9. tiket_pesawat <- read.csv(textConnection(isi_csv), header = TRUE, sep = ",")
  10.  
  11. # Menampilkan data
  12. print(tiket_pesawat)
  13.  
Success #stdin #stdout 0.28s 41592KB
stdin
Standard input is empty
stdout
  ID_Transaksi Maskapai             Rute Jumlah_Tiket Harga_Tiket
1            1   Garuda     Jakarta-Bali           20     1500000
2            2 Lion Air Jakarta-Surabaya           15      900000
3            3  AirAsia    Jakarta-Medan           10     1200000
4            4 Citilink   Jakarta-Lombok            8     1100000