Apuntes sobre Data Frame

#---------------------------------------------------------------------

#Crea un Data Frame con nombre "Ventas"

Ventas  <-  data.frame(Cliente  = c("Juan","Pedro","Maria","Susana"),

                       Edad     = c(20,30,80,40),

                       Cantidad = c(5,11,10,15),

                       Sucursal = c("Norte", "Sur", "Este", "Norte"))

Resultado

#---------------------------------------------------------------------

# muestra la estrucutra del data frame

str(Ventas)

Resultado

#---------------------------------------------------------------------
#Selecciona los dos primeros registros

#y las tres primeras columnas

Ventas[1:2,1:3]

Resultado

#---------------------------------------------------------------------

# Selecciona los campos Cliente, Cantidad y Sucursal

#Metodo 1

subset(Ventas,select = c(Cliente, Cantidad, Sucursal))

#Metodo 2

Ventas[,c("Cliente","Cantidad", "Sucursal")]

Resultado

#---------------------------------------------------------------------

# Selecciona todos los campos, excepto el campo "Edad"

within(Ventas, rm(Edad))

Resultado

#---------------------------------------------------------------------

# Registros con Cantidad menor a 10

Ventas[Ventas$Cantidad < 10,]

Resultado

#---------------------------------------------------------------------

# Registros donde Sucursal es igual a Norte

Ventas[Ventas$Sucursal=="Norte",]

Resultado

#---------------------------------------------------------------------
# Registros donde Sucursal es diferente a Norte

Ventas[!Ventas$Sucursal=="Norte",]

Resultado

#---------------------------------------------------------------------
# Registros donde Sucursal es igual a Norte y Cantidad menor a 10

#Opcion 1

subset(Ventas, Sucursal == "Norte" &  Cantidad    <  10)

#Opcion 2
Ventas[  Ventas$Sucursal   == "Norte"

       & Ventas$Cantidad    <  10,]

Resultado

#---------------------------------------------------------------------
# Registros donde Sucursal es igual a Sur o Este

#Opcion 1
subset(Ventas, Sucursal %in%  c("Sur", "Este"))

#Opcion 2
Ventas[Ventas$Sucursal %in% c("Sur", "Este"), ]

Resultado

#---------------------------------------------------------------------
# Registros con cantidad mayor a la cantidad del cliente "Maria"

Ventas [Ventas$Cantidad

        >

        Ventas[Ventas$Cliente=="Maria","Cantidad"],]

Resultado

#---------------------------------------------------------------------

# Ordena decreciente por cantidad

Ventas[order(Ventas$Cantidad,decreasing=T),]

Resultado

#---------------------------------------------
# Elimina las columnas EDAD y CLIENTE

#Opcion 1
within(Ventas, rm(Edad,Cliente))

#Opcion 2
Ventas[,-match(c("Edad","Cliente"),names(Ventas))]

#--------------------------------------------- 
# Cambiar el nombre a una columna
names(DATOS)[names(DATOS) == 'nombreviejo'] <- 'nombrenuevo'




#--------------------------------------------- 
# calcula el valor procentual de una tabla / matri
prop.table(datos)



#--------------------------------------------- 
# borrar una variable / columna
datos$Cantidad <- NULL