Ringkasan: Vektor Harga

Termasuk bagian Dasar-Dasar dalam perjalanan R di Coddy. Pelajaran 60 dari 78.

Tantangan

Mudah

Kamu akan menerima dua baris input:

Daftar harga awal yang dipisahkan dengan koma (misalnya, 100,200,150,80)
Persentase diskon berupa bilangan bulat (misalnya, 20 untuk 20%)

Lakukan operasi berikut:

Buat vector dari harga yang dipisahkan dengan koma
Manajer toko menyadari bahwa harga barang ketiga salah. Ubah menjadi 125
Terapkan diskon ke semua harga (kalikan dengan (100 - discount) / 100)
Cetak vector harga setelah diskon
Cetak total semua harga setelah diskon menggunakan sum()
Cetak harga rata-rata setelah diskon menggunakan mean()

Contohnya, jika inputnya adalah:

100,200,150,80
20

Outputnya seharusnya:

[1]  80 160 100  64
[1] 404
[1] 101

Penjelasan: Harga barang ketiga diubah menjadi 125, lalu diskon 20% diterapkan (kalikan dengan 0.8), sehingga menghasilkan harga 80, 160, 100, dan 64.

Coba sendiri

# Baca input
con <- file("stdin", "r")
prices_input <- suppressWarnings(readLines(con, n = 1))
discount <- suppressWarnings(readLines(con, n = 1))
close(con)

# Konversi input
original_prices <- as.numeric(unlist(strsplit(prices_input, ",")))
discount_percent <- as.numeric(discount)

# TODO: Tulis kodemu di bawah ini
# 1. Ubah item ketiga menjadi 125
# 2. Terapkan diskon pada semua harga
# 3. Cetak vektor harga setelah diskon
# 4. Cetak total menggunakan sum()
# 5. Cetak rata-rata menggunakan mean()