practica1

# MI PRIMER SCRIPT EN R

# el simbolo numeral se usa para añadir un comentario

a=50
b=25
c=a+b
c

## [1] 75

# podemos cargar datos como vectores

edades=c(25,27,26,28,24,25,26,30,31)
edades

## [1] 25 27 26 28 24 25 26 30 31

genero=c("M","M","H","H","M","H","H","H","M")
genero

## [1] "M" "M" "H" "H" "M" "H" "H" "H" "M"

#calcular la edad promedio
edadpromedio=mean(edades)
edadpromedio

## [1] 26.88889

# agregar una tabla para genero

table(genero)

## genero
## H M 
## 5 4

#graficos en R

barplot(table(genero), names=c("Hombres","Mujeres"))

# guardar los datos como un cuadro de datos, o un data.frame
# etiquetar las categorías de genero

datos=data.frame(edades,genero)
datos

##   edades genero
## 1     25      M
## 2     27      M
## 3     26      H
## 4     28      H
## 5     24      M
## 6     25      H
## 7     26      H
## 8     30      H
## 9     31      M