martes, 6 de enero de 2015

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





No hay comentarios:

Publicar un comentario