Vectores Numéricos
Declaración de vectores
x <- c(1,2,3,4,5) d <- c(4.5,6.2,7.3) assign("y",c(1,2,3,4,5))
Visualización del contenido
x[3] [1] 3 x[c(1,3,5)] [1] 1 3 5 x[-c(1,3,5)] [1] 2 4 x>3 [1] FALSE FALSE FALSE TRUE TRUE x[x>3] [1] 4 5
Invertir vector
x <- c(1,2,3,4) rev(x)
Concatenar vectores
w <- c(x,0,0,0,x) w [1] 1 2 3 4 5 0 0 0 1 2 3 4 5
Asignar nombre a las posiciones de un vector
names(x) <- c("Manzanas", "Naranjas", "Ciruelas", "Platanos", "Uvas") x Manzanas Naranjas Ciruelas Platanos Uvas 1 2 3 4 5
Generación de secuencias
x <- 1:5
x
[1] 1 2 3 4 5
s <- seq(-3, 3, by=.5) s [1] -3.0 -2.5 -2.0 -1.5 -1.0 -0.5 0.0 0.5 1.0 1.5 2.0 2.5 3.0
w <- rep(x, times=2) w [1] 1 2 3 4 5 1 2 3 4 5
Valores Nulos
x<-c(1,2,NA,4,5) x [1] 1 2 NA 4 5 is.na(x) [1] FALSE FALSE TRUE FALSE FALSE x[x>2] [1] NA 4 5 x*2 [1] 2 4 NA 8 10
Vectores de caracteres
Declaración de vectores
x <- c('a','b','c','d','e')
Generación de secuencias de letras y números
w <- paste0(1:12, c("st", "nd", "rd", rep("th", 9)))
w
[1] "1st" "2nd" "3rd" "4th" "5th" "6th" "7th" "8th" "9th" "10th" "11th" "12th"
Factores ( definirlos, calcular longitud y su resumen)
nivel.ingles<-c("medio", "bajo", "bajo", "medio", "bajo", "medio", "alto", "alto", "medio", "bajo" ) nivel.ingles [1] "medio" "bajo" "bajo" "medio" "bajo" "medio" "alto" "alto" "medio" "bajo" length(nivel.ingles) [1] 10 f.nivel.ingles<-as.factor(nivel.ingles) f.nivel.ingles [1] medio bajo bajo medio bajo medio alto alto medio bajo Levels: alto bajo medio levels(f.nivel.ingles) [1] "alto" "bajo" "medio" summary(f.nivel.ingles) alto bajo medio 2 4 4
Factores (media)
notas <- c(6,2,3,5,1,7,8,9,7,3) length(notas) tapply(notas,f.nivel.ingles,mean)
Factores (ordenar)
f.nivel.ordenado<-ordered(nivel.ingles,levels=c("bajo","medio","alto")) f.nivel.ordenado [1] medio bajo bajo medio bajo medio alto alto medio bajo Levels: bajo < medio < alto f.nivel.ordenado <"medio" [1] FALSE TRUE TRUE FALSE TRUE FALSE FALSE FALSE FALSE TRUE
0 comentarios