clase 0.1

1+1

## [1] 2

TABLA DE DATOS

nombres=c("brenda", "ernesto","alejandra", "ariana")
peso=c(50,68,60,55)
estatura=c(1.40,1.69,1.57,1.10)
edad=c(20,20,19,19)
sexo=c("f","m","f","f")
TABLA.DE.DATOS=data.frame(nombres, peso, estatura, edad, sexo, stringsAsFactors = F)
TABLA.DE.DATOS

##     nombres peso estatura edad sexo
## 1    brenda   50     1.40   20    f
## 2   ernesto   68     1.69   20    m
## 3 alejandra   60     1.57   19    f
## 4    ariana   55     1.10   19    f

TABLA.DE.DATOS[TABLA.DE.DATOS$nombres=='alejandra',"peso"]

## [1] 60

TABLA.DE.DATOS[TABLA.DE.DATOS$peso=='68', "nombres"]

## [1] "ernesto"

TABLA.DE.DATOS[TABLA.DE.DATOS$peso==max(TABLA.DE.DATOS$peso),"nombres"]

## [1] "ernesto"

TABLA.DE.DATOS[TABLA.DE.DATOS$estatura==min(TABLA.DE.DATOS$estatura), "nombres"]

## [1] "ariana"

TABLA.DE.DATOS[TABLA.DE.DATOS$edad=='20',"nombres"]

## [1] "brenda"  "ernesto"

segunda tabla

nombre=c("zaira", "joanna", "paulo", "gonzalo")
carrera=c("ciencia politica", "trabajo social", "derecho", "derecho")
nota=c(16,14,10,15)
edad=c(18,20,24752750,21)
ciudad=c("lima", "cañete", "yauyos", "huacho")
segunda.tabla=data.frame(nombre,carrera,nota,edad, ciudad, stringsAsFactors = F)
segunda.tabla

##    nombre          carrera nota     edad ciudad
## 1   zaira ciencia politica   16       18   lima
## 2  joanna   trabajo social   14       20 cañete
## 3   paulo          derecho   10 24752750 yauyos
## 4 gonzalo          derecho   15       21 huacho

segunda.tabla[segunda.tabla$nombre=='paulo', "ciudad"]

## [1] "yauyos"