EJERCICIOS EN R

En el presente informe encontrará información relacionada a los datos de una empresa comercial.

Tenemos el Listado de Productos con su Stock y Precios:

##             Productos Stock PVP   IVA
## 1        Televisor 32     4 250  TRUE
## 2   Televisor LED 55      5 680  TRUE
## 3 Impresora Matricial     8 210 FALSE
## 4           Parlantes     3  89 FALSE
## 5 Ipresoras Inyeccion    10 280  TRUE

Marcas de Productos con las que trabaja la empresa:

## [1] "Sony"     "Logitech" "Epson"

Las ventas por mes de la empresa:

##       Mes  Neto  IVA TOTAL
## 1   Enero 23600 1780 25380
## 2 Febrero 12340 1350 13690
## 3   Marzo  8900  970  9870
## 4   Abril  5600  450  6050
## 5    Mayo  9600  990 10590

Con la información indicada crear una lista que contenga toda la información de la empresa.

1.- Colocar nombres a cada unos de los objetos de la lista

Paso 1: Con la información ya obtenida crearemos una lista de nombre Empresa_Comercial que contenga la Lista de los Productos, las Marcas y las Ventas por Mes de la empresa.

Empresa_Comercial<-list(Lista_Productos,Marcas_Producto,Ventas_por_mes)
Empresa_Comercial
## [[1]]
##             Productos Stock PVP   IVA
## 1        Televisor 32     4 250  TRUE
## 2   Televisor LED 55      5 680  TRUE
## 3 Impresora Matricial     8 210 FALSE
## 4           Parlantes     3  89 FALSE
## 5 Ipresoras Inyeccion    10 280  TRUE
## 
## [[2]]
## [1] "Sony"     "Logitech" "Epson"   
## 
## [[3]]
##       Mes  Neto  IVA TOTAL
## 1   Enero 23600 1780 25380
## 2 Febrero 12340 1350 13690
## 3   Marzo  8900  970  9870
## 4   Abril  5600  450  6050
## 5    Mayo  9600  990 10590

Paso 2: Hecho esto, usamos el comando names para presentar de mejor manera la información a los usuarios.

## $`Listado de productos con su stock y precios:`
##             Productos Stock PVP   IVA
## 1        Televisor 32     4 250  TRUE
## 2   Televisor LED 55      5 680  TRUE
## 3 Impresora Matricial     8 210 FALSE
## 4           Parlantes     3  89 FALSE
## 5 Ipresoras Inyeccion    10 280  TRUE
## 
## $`Marcas de Productos con las que trabaja la empresa`
## [1] "Sony"     "Logitech" "Epson"   
## 
## $`Ventas por mes de la empresa`
##       Mes  Neto  IVA TOTAL
## 1   Enero 23600 1780 25380
## 2 Febrero 12340 1350 13690
## 3   Marzo  8900  970  9870
## 4   Abril  5600  450  6050
## 5    Mayo  9600  990 10590

2.- Escribimos un comando que muestre el listado de las marcas con las que trabaja la empresa.

Paso 1: Primero utilizaremos el comando PRINT para imprimir el “listado de marcas”, seguido se aplicará el comando PRINT a la matriz Empresa_Comercial, y seleccionamos el vector [2], el cual es las marcas que trabaja la empresa.

print("LISTADO DE MARCAS")
## [1] "LISTADO DE MARCAS"
print(Empresa_Comercial[[2]])
## [1] "Sony"     "Logitech" "Epson"

3. Escribir un comando que muestre los datos de las ventas de abril de la empresa

Paso 1: Seleccionamos en la matriz Empresa_Comercial, en la cual seleccionaremos el vector que es de nuestro interés en este caso el [3] y seleccionamos solo el mes de abril con el comando PRINT, y luego realizamos la comprobación del resultado con ncol y bycol.

print(Empresa_Comercial[[3]][[4,4]])
## [1] 6050
print(Empresa_Comercial[[3]][ ,4], ncol=1, bycol=TRUE)
## [1] 25380 13690  9870  6050 10590

4. A la lista anterior agregar la siguiente información de proveedores de la empresa

Paso 1: Empezamos creando cada una de las nuevas variables que nos solicitan incorporar a nuestra Data Frame, en este caso Proveedor, Ciudad y Teléfono.

Paso 2: Creamos la nueva matriz de 3 columnas y 3 filas, con la nueva variable en este caso es Proveedores, seguido escribimos el nombre de nuestra nueva tabla y verificamos si se incrementó de manera correcta a nuestra Data Frame.

## $`Listado de productos con su stock y precios:`
##             Productos Stock PVP   IVA
## 1        Televisor 32     4 250  TRUE
## 2   Televisor LED 55      5 680  TRUE
## 3 Impresora Matricial     8 210 FALSE
## 4           Parlantes     3  89 FALSE
## 5 Ipresoras Inyeccion    10 280  TRUE
## 
## $`Marcas de Productos con las que trabaja la empresa`
## [1] "Sony"     "Logitech" "Epson"   
## 
## $`Ventas por mes de la empresa`
##       Mes  Neto  IVA TOTAL
## 1   Enero 23600 1780 25380
## 2 Febrero 12340 1350 13690
## 3   Marzo  8900  970  9870
## 4   Abril  5600  450  6050
## 5    Mayo  9600  990 10590
## 
## $Proveedores
##                  Proveedor Ciudad Telefono
## 1       Importadora Austro Cuenca  2222222
## 2 Comercializadora del Sur   Loja  7777777
## 3          ABC & Asociados  Quito  8888888

5. Eliminar de la lista el objeto que contiene las marcas de los productos.

Paso 1: Utilizaremos la variable Empresa_Comercial a la cual le asignamos todos los valores, procedemos a utilizar el comando NULL para proceder con la eliminación de las marcas de los productos, seleccionamos el vector [2] el cual contiene estos datos y procedemos con la ejecución para verificar el cambio realizado.

## $`Listado de productos con su stock y precios:`
##             Productos Stock PVP   IVA
## 1        Televisor 32     4 250  TRUE
## 2   Televisor LED 55      5 680  TRUE
## 3 Impresora Matricial     8 210 FALSE
## 4           Parlantes     3  89 FALSE
## 5 Ipresoras Inyeccion    10 280  TRUE
## 
## $`Ventas por mes de la empresa`
##       Mes  Neto  IVA TOTAL
## 1   Enero 23600 1780 25380
## 2 Febrero 12340 1350 13690
## 3   Marzo  8900  970  9870
## 4   Abril  5600  450  6050
## 5    Mayo  9600  990 10590
## 
## $Proveedores
##                  Proveedor Ciudad Telefono
## 1       Importadora Austro Cuenca  2222222
## 2 Comercializadora del Sur   Loja  7777777
## 3          ABC & Asociados  Quito  8888888