1.Crea un vector a con los valores 2, 4, 6, 8, 10, 12.
a<-c(2,4,6,8,10,12)2.Calcula la suma de los elementos del vector a.
2+4+6+8+10+12## [1] 423.Calcula el producto de los elementos del vector a.
2*4*6*8*10*12## [1] 460804.Crea un vector b con los valores 1, 3, 5, 7, 9. Calcula la diferencia entre los elementos del vector a y el vector b.
a<-c(2,4,6,8,10,12)
b<-c(1,3,5,7,9,3)
print(a-b)## [1] 1 1 1 1 1 95.Crear dos vectores y calcular: Suma, producto, potenciación, radicación
p<-c(2,5,8,6)
q<-c(5,7,3,4)
print(p+q)## [1] 7 12 11 10print(p*q)## [1] 10 35 24 24print(p**q)## [1] 32 78125 512 1296print(sqrt(p))## [1] 1.414214 2.236068 2.828427 2.449490print(sqrt(q))## [1] 2.236068 2.645751 1.732051 2.0000006. Comparar dos cantidades que sean iguales y dos diferentes.
5==5## [1] TRUE5==8## [1] FALSE7. Crea un nuevo data frame df2 con las columnas nombre y edad de las personas que viven en la ciudad de “Neiva”. Agrega 12 filas con datos ficticios. De lo anterior Calcula el número de personas que viven en cada ciudad en el data frame df
nombre<-c('Maura','Camila','Johan R.','elkin','alejandro','Yandry','Nicolas','Dirley','William','Daniela','Steven','Yuliana')
edad<-c(20,21,21,18,17,19,20,19,24,18,22,20)
dt<-data.frame(nombre,edad)
print(dt)## nombre edad
## 1 Maura 20
## 2 Camila 21
## 3 Johan R. 21
## 4 elkin 18
## 5 alejandro 17
## 6 Yandry 19
## 7 Nicolas 20
## 8 Dirley 19
## 9 William 24
## 10 Daniela 18
## 11 Steven 22
## 12 Yuliana 208.Agregar dos columnas: Estrato, nivel de estudios, al anterior dataframe
nombre<-c('Maura','Camila','Johan R.','elkin','alejandro','Yandry','Nicolas','Dirley','William','Daniela','Steven','Yuliana')
edad<-c(20,21,21,18,17,19,20,19,24,18,22,20)
dt<-data.frame(nombre,edad)
dt$estrato<-c(1,1,1,1,1,1,2,3,2,3,1,2)
dt$niveldeestudio<-c('bachiller','profesional','bachiller','profesional','profesional','bachiller', 'primaria', 'primaria','primaria','bachiller', 'profesional', 'profesional')
print(dt)## nombre edad estrato niveldeestudio
## 1 Maura 20 1 bachiller
## 2 Camila 21 1 profesional
## 3 Johan R. 21 1 bachiller
## 4 elkin 18 1 profesional
## 5 alejandro 17 1 profesional
## 6 Yandry 19 1 bachiller
## 7 Nicolas 20 2 primaria
## 8 Dirley 19 3 primaria
## 9 William 24 2 primaria
## 10 Daniela 18 3 bachiller
## 11 Steven 22 1 profesional
## 12 Yuliana 20 2 profesional9.Agregar cuatro filas de datos ficticios
nombre<-c('Maura','Camila','Johan R.','elkin','alejandro','Yandry','Nicolas','Dirley','William','Daniela','Steven','Yuliana')
edad<-c(20,21,21,18,17,19,20,19,24,18,22,20)
dt<-data.frame(nombre,edad)
dt$estrato<-c(1,1,1,1,1,1,2,3,2,3,1,2)
dt$niveldeestudio<-c('bachiller','profesional','bachiller','profesional','profesional','bachiller', 'primaria', 'primaria','primaria','bachiller', 'profesional', 'profesional')
valentina<-data.frame(nombre='Valentina',edad=28,estrato=4,niveldeestudio='profesional')
sofia<-data.frame(nombre='Sofia',edad=36,estrato=3,niveldeestudio='bachiller')
dt<-rbind(dt,valentina)
dt<-rbind(dt,sofia)
print(dt)## nombre edad estrato niveldeestudio
## 1 Maura 20 1 bachiller
## 2 Camila 21 1 profesional
## 3 Johan R. 21 1 bachiller
## 4 elkin 18 1 profesional
## 5 alejandro 17 1 profesional
## 6 Yandry 19 1 bachiller
## 7 Nicolas 20 2 primaria
## 8 Dirley 19 3 primaria
## 9 William 24 2 primaria
## 10 Daniela 18 3 bachiller
## 11 Steven 22 1 profesional
## 12 Yuliana 20 2 profesional
## 13 Valentina 28 4 profesional
## 14 Sofia 36 3 bachillerprint(dt)## nombre edad estrato niveldeestudio
## 1 Maura 20 1 bachiller
## 2 Camila 21 1 profesional
## 3 Johan R. 21 1 bachiller
## 4 elkin 18 1 profesional
## 5 alejandro 17 1 profesional
## 6 Yandry 19 1 bachiller
## 7 Nicolas 20 2 primaria
## 8 Dirley 19 3 primaria
## 9 William 24 2 primaria
## 10 Daniela 18 3 bachiller
## 11 Steven 22 1 profesional
## 12 Yuliana 20 2 profesional
## 13 Valentina 28 4 profesional
## 14 Sofia 36 3 bachiller