Trabajar con vectores en R

El lenguaje de programación R está orientado al cálculo científico y en especial a la estadística por lo que el manejo de vectores se encuentra muy desarrollado.

Creación de vectores

Podemos crear vectores con datos numéricos, string o booleanos pero sin mezclar tipos. Si mezclamos se convierten todos a string.

# Asignamos valores al vector v
v <- c(1,-3,5,7,9.5)
w <- c(100,200,300,400,500)
# Imprimimos v, w
v
w
# Los vectores pueden contener strings
character_vector <- c("a", "b", "c")
character_vector
# Los vectores pueden contener valores lógicos
boolean_vector <- c(TRUE, FALSE, TRUE)
boolean_vector

Nombrar vectores

En algunos casos puede ser necesario dar un nombre a los valores de un vector.

#Vector de pérdidas y ganancias diarias de una semana
pg <- c(170, -20, 50, -160, 290)
#Imprimimos el vector pg aún sin ser nombrado
pg
#Asignamos días como nombres del vector pg
names(pg) <- c("Lun", "Mar", "Mie", "Jue", "Vie")
# Imprimimos el vector después de ser nombrado
pg
#Podemos asignar los días de la semana a un vector
dias <- c('Lun','Mar','Mie','Jue','Vie')
dias
#Creamos otro vector de perdidas y ganancias
beneficio <- c(-19,-86,125,-343,71)
#Nombramos el vector
names(beneficio) <- dias
beneficio #Imprimimos el vector ya nombrado

Sumar vectores

La suma de vectores da como resultado otro vector que es suma de los elementos de ambos vectores. Por el contrario si utilizamos la función sum() sobre un vector el resultado será la suma de todos los elementos de ese vector.

a <- c(1, 3, 4) 
b <- c(2, 2, 3)
c <- a + b       #El vector c es suma de los vectores a y b
a                #Imprimimos a
b                #Imprimimos b
c                #Imprimimos c
#Elevamos los elementos de a usando como potencias los de b
#El resultado no se asigna a ninguna variable simplemente se imprime
a^b
#Suma de todos los elementos de un vector
sum(c)
#Comprobamos que la suma de todos los elementos de c es igual a los de a y b juntos
sum(c)==sum(a+b)

Elementos de un vector

Podemos trabajar con elementos individuales o conjuntos de elementos de un vector usando los corchetes [].

beneficio <- c(-19,-86,125,-343,71)
print('Imprimimos el vector sin nombrar')
beneficio
print('Imprimimos el segundo elemento del vector')
beneficio[2]
dias <- c('Lun','Mar','Mie','Jue','Vie')
#Nombramos el vector
names(beneficio) <- dias
print('Ahora al imprimir el 2º elemento del vector se verá el nombre')
beneficio[2]
print('Imprimimos el valor del viernes')
beneficio['Vie']
print('Imprimimos el valor del miércoles y del viernes')
beneficio[c('Mie','Vie')]
print('Veamos los tres elementos centrales')
beneficio[c(2, 3, 4)]
print('Días centrales entre 2 y 4')
centrales <- beneficio[2:4]
centrales
#cat imprime dos elementos separados por coma
#mean calcula la media de los elementos de un vector
cat('La media de los días centrales es',mean(centrales))