Ringkasan: list Produk

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

Tantangan

Mudah

Kamu akan menerima empat baris input:

Nama produk (misalnya, Wireless Headphones)
Harga (misalnya, 79.99)
Jumlah stok (misalnya, 25)
Persentase diskon yang akan diterapkan (misalnya, 20)

Lakukan operasi berikut:

Buat named list bernama product dengan elemen: name (character), price (numeric), stock (numeric), dan available (atur ke TRUE jika stok lebih dari 0, jika tidak, atur ke FALSE)
Cetak nama produk menggunakan operator $
Hitung harga setelah diskon (harga awal dikurangi persentase diskon) dan perbarui elemen price
Tambahkan elemen baru bernama discounted dengan nilai TRUE
Kurangi stock sebanyak 1 (untuk menyimulasikan pembelian)
Hapus elemen available dari list
Cetak list akhir

Contohnya, jika inputnya adalah:

Smart Watch
150
10
25

Outputnya seharusnya:

[1] "Smart Watch"
$name
[1] "Smart Watch"

$price
[1] 112.5

$stock
[1] 9

$discounted
[1] TRUE

Penjelasan:

Harga awal 150 dengan diskon 25%: 150 - (150 * 25/100) = 112.5
Stok dikurangi dari 10 menjadi 9
Elemen available dihapus dari list akhir

Coba sendiri

# Baca input
con <- file("stdin", "r")
product_name <- suppressWarnings(readLines(con, n = 1))
price <- as.numeric(suppressWarnings(readLines(con, n = 1)))
stock <- as.numeric(suppressWarnings(readLines(con, n = 1)))
discount_percentage <- as.numeric(suppressWarnings(readLines(con, n = 1)))
close(con)

# TODO: Tulis kodemu di bawah ini
# 1. Buat list bernama 'product' dengan elemen: name, price, stock, dan available
# 2. Tampilkan nama produk menggunakan operator $
# 3. Hitung harga setelah diskon dan perbarui elemen price
# 4. Tambahkan elemen baru bernama 'discounted' dengan nilai TRUE
# 5. Kurangi stock sebanyak 1
# 6. Hapus elemen 'available' dari list
# 7. Tampilkan list akhir