Ripasso - Vettore invertito

Fa parte della sezione Fondamenti del percorso R di Coddy. Lezione 61 di 78.

Sfida

Facile

Riceverai una singola riga di input contenente numeri separati da virgole (ad es., 10,20,30,40,50).

Esegui le seguenti operazioni:

Crea un vettore a partire dall'input con i numeri separati da virgole
Inverti il vettore in modo che l'ultimo elemento diventi il primo
Stampa il vettore invertito
Stampa la somma del primo e dell'ultimo elemento del vettore invertito

Ad esempio, se l'input è:

5,15,25,35,45

L'output dovrebbe essere:

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

Spiegazione: Il vettore originale c(5, 15, 25, 35, 45) viene invertito in c(45, 35, 25, 15, 5). La somma del primo elemento (45) e dell'ultimo elemento (5) del vettore invertito è 50.

Provalo tu

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

# Converti i numeri separati da virgole in un vettore
numbers <- as.numeric(strsplit(input, ",")[[1]])

# TODO: Scrivi il tuo codice qui sotto
# 1. Inverti il vettore
# 2. Stampa il vettore invertito
# 3. Calcola e stampa la somma del primo e dell'ultimo elemento del vettore invertito