Ringkasan: Vektor Terbalik

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

Tantangan

Mudah

Kamu akan menerima satu baris input yang berisi angka-angka yang dipisahkan koma (misalnya, 10,20,30,40,50).

Lakukan operasi berikut:

Buat vector dari input yang dipisahkan koma
Balik vector sehingga elemen terakhir menjadi elemen pertama
Print vector yang sudah dibalik
Print jumlah elemen pertama dan terakhir dari vector yang sudah dibalik

Misalnya, jika input-nya adalah:

5,15,25,35,45

Output-nya harus:

[1] 45 35 25 15  5
[1] 50

Penjelasan: Vector asli c(5, 15, 25, 35, 45) dibalik menjadi c(45, 35, 25, 15, 5). Jumlah elemen pertama (45) dan elemen terakhir (5) dari vector yang sudah dibalik adalah 50.

Coba sendiri

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

# Ubah angka yang dipisahkan koma menjadi vektor
numbers <- as.numeric(strsplit(input, ",")[[1]])

# TODO: Tulis kodemu di bawah ini
# 1. Balik urutan vektor
# 2. Cetak vektor yang sudah dibalik
# 3. Hitung dan cetak jumlah elemen pertama dan terakhir dari vektor yang sudah dibalik