list Bernama

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

Sama seperti vektor bernama, list dapat memiliki nama yang ditetapkan ke elemennya. Ini membuat kodemu lebih mudah dibaca dan memungkinkan kamu mengakses elemen dengan label yang bermakna, bukan dengan posisi angka.

Kamu dapat menetapkan nama saat membuat list:

person <- list(name = "Alice", age = 25, active = TRUE)
print(person)

Output:

$name
[1] "Alice"

$age
[1] 25

$active
[1] TRUE

Perhatikan bahwa output sekarang menampilkan $name, bukan [[1]]. Untuk mengakses elemen bernama, gunakan operator $:

person <- list(name = "Alice", age = 25, active = TRUE)
print(person$age)

Output:

[1] 25

Kamu juga bisa menggunakan tanda kurung siku ganda dengan nama sebagai string. Ini berguna saat nama disimpan dalam variabel:

person <- list(name = "Alice", age = 25)
print(person[["name"]])

Output:

[1] "Alice"

Mengubah elemen bernama bekerja dengan cara yang sama. Gunakan $ untuk mengubah nilai yang sudah ada atau menambahkan nilai baru:

person <- list(name = "Alice", age = 25)
person$age <- 26
person$city <- "Paris"
print(person)

Output:

$name
[1] "Alice"

$age
[1] 26

$city
[1] "Paris"

Tantangan

Mudah

Kamu akan menerima tiga baris input:

Judul buku (misalnya, The Great Gatsby)
Penulis buku (misalnya, F. Scott Fitzgerald)
Tahun terbit (misalnya, 1925)

Lakukan operasi berikut:

Buat list bernama book dengan tiga elemen: title, author, dan year (ubah year menjadi numerik)
Cetak judul buku menggunakan operator $
Cetak tahun buku menggunakan tanda kurung siku ganda dengan nama sebagai string
Perbarui year agar menjadi 1 tahun lebih lambat menggunakan operator $
Tambahkan elemen baru bernama available dengan nilai TRUE
Cetak list yang telah diperbarui secara lengkap

Misalnya, jika inputnya adalah:

1984
George Orwell
1949

Output-nya seharusnya:

[1] "1984"
[1] 1949
$title
[1] "1984"

$author
[1] "George Orwell"

$year
[1] 1950

$available
[1] TRUE

Penjelasan:

book$title mencetak nilai judul
book[["year"]] mencetak tahun awal
Tahun diperbarui dari 1949 menjadi 1950
Elemen available baru ditambahkan dengan nilai TRUE

Coba sendiri

# Baca input
con <- file("stdin", "r")
title <- suppressWarnings(readLines(con, n = 1))
author <- suppressWarnings(readLines(con, n = 1))
year <- suppressWarnings(readLines(con, n = 1))
close(con)

# TODO: Tulis kodemu di bawah ini
# 1. Buat list bernama 'book' dengan elemen: title, author, dan year (ubah year menjadi numerik)
# 2. Cetak title dari book menggunakan operator $
# 3. Cetak year dari book menggunakan kurung siku ganda dengan namanya sebagai string
# 4. Perbarui year menjadi 1 tahun setelahnya menggunakan operator $
# 5. Tambahkan elemen baru bernama 'available' dengan nilai TRUE
# 6. Cetak seluruh list yang telah diperbarui