Vectores
a<- c(6, 9, 13, 15)
h<- c(8, 5, 6, 9)
h
## [1] 8 5 6 9
a<- c("PAN", "PRI", "MORENA", "PRD")
a
## [1] "PAN" "PRI" "MORENA" "PRD"
a<- 1:5
a
## [1] 1 2 3 4 5
a<-seq(from=0, to=100, by=2)
a
## [1] 0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36
## [20] 38 40 42 44 46 48 50 52 54 56 58 60 62 64 66 68 70 72 74
## [39] 76 78 80 82 84 86 88 90 92 94 96 98 100
a<-rep(50, times=100)
a
## [1] 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50
## [26] 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50
## [51] 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50
## [76] 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50 50
Objetos
a<-1
b<-100
c<- a+b
c
## [1] 101
Matrices
cbind(1:5, 6:10, 11:15)
## [,1] [,2] [,3]
## [1,] 1 6 11
## [2,] 2 7 12
## [3,] 3 8 13
## [4,] 4 9 14
## [5,] 5 10 15
rbind(1:5, 6:10, 11:15)
## [,1] [,2] [,3] [,4] [,5]
## [1,] 1 2 3 4 5
## [2,] 6 7 8 9 10
## [3,] 11 12 13 14 15
matrix(1:12, nrow=3, ncol=4)
## [,1] [,2] [,3] [,4]
## [1,] 1 4 7 10
## [2,] 2 5 8 11
## [3,] 3 6 9 12
Funciones
a<-1
b<- 100
suma<- a+b
suma
## [1] 101
Dataframe
base1 <- data.frame("edad" = c(19, 21), "sexo" = c("M", "H"))
library(help="datasets")