a<- “variables” # Crear un vector
x <- 12
Nombre<- c("Elizabeth", "Camilo","Viviana")
Edad <- c(21,30,29)
Peso <-c(59,69,57)
Ocupación <- c("Estudiante","Estudiante","Abogada")
Datos<- data.frame(Nombre, Edad, Peso,Ocupación)
a <- c(2,4,6,8,10,12)
Suma<- sum(a)
Producto<- prod(a)
b<- c(1,3,5,7,9)
Diferencia <- a-b
## Warning in a - b: longitud de objeto mayor no es múltiplo de la longitud de uno
## menor
d<-c(11,12,14,15)
e<- c(5,4,8,9)
Potenciacion <-(d^2)
Potenciación<-(e^2) # e
radicacion <- (sqrt(e)) # d
rad <- sqrt(d)
d*e
## [1] 55 48 112 135
d+e
## [1] 16 16 22 24
10==10
## [1] TRUE
10==25
## [1] FALSE
Nombre <- c("Anthonny", "Jose", "Yamileth", "Maidy", "Nathaly", "Ruben", "Jasmidth", "Oscar", "Cristhian", "Fernando", "Brayan", "Emmanuel")
Edad <- c(19,24,23, 22,18,19, 19,17,21,22,23,20)
df2 <- data.frame(Nombre, Edad)
print(df2)
## Nombre Edad
## 1 Anthonny 19
## 2 Jose 24
## 3 Yamileth 23
## 4 Maidy 22
## 5 Nathaly 18
## 6 Ruben 19
## 7 Jasmidth 19
## 8 Oscar 17
## 9 Cristhian 21
## 10 Fernando 22
## 11 Brayan 23
## 12 Emmanuel 20
#Numero de personas que viven en Neiva
nrow(df2)
## [1] 12
df2$Estrato <- c(2,2,2,2,2,4,4,3,4,2,3,2)
df2$Nivel_de_Estudio <- c("Basico", "Universitario", "Basico", "Especialización", "Maestria", "Universitario","Basico", "Universitario", "Basico", "Especialización", "Maestria", "Universitario" )
####9. Agregar 4 filas de datos ficcticios
Isabela<-data.frame(Nombre="isabela", Edad=20, Estrato= 2, Nivel_de_estudio="Basico")
Camila<-data.frame(Nombre="Camila",Edad= 23,Estrato=3, Nivel_de_estudio= "Universitario")
Maria<-data.frame(Nombre="Maria",Edad= 24,Estrato=3, Nivel_de_estudio= "Maestria")
Paula<-data.frame(Nombre="Paula",Edad= 19,Estrato=1, Nivel_de_estudio= "Basico")