*Crea un vector con los nombres de cinco paises e imprime el tercero y el quinto.
a<-c("Colombia","Mexio","España","Italia","Chile")
a
## [1] "Colombia" "Mexio" "España" "Italia" "Chile"
d="Mexico"
e="Chile"
f="Mexico Chile"
print(f)
## [1] "Mexico Chile"
*¿Cuál es la diferencia entre un vector y un data.frame en R.
Un vector es tomado como variables caractaresiticas, pueden ser numericos y caracteristicos, el data.frame es una tabla que nos ayuda a organizar los datos de una manera clara y ordenada.
*¿Qué resultado devuelve la siguiente operación lógica en R? (5 >= 3) & (4 == 2 + 2) | (7 < 1)
x=5>=3
print(x)
## [1] TRUE
y=4==2+2
print(y)
## [1] TRUE
z=7<1
print(z)
## [1] FALSE
w=TRUE&TRUE
print(w)
## [1] TRUE
W=TRUE|FALSE
print(W)
## [1] TRUE
Podemos vefiricar que un objeto en R es de tipo númerico si se puede realizar una suma simple,ejemplo:
x=9
y=12
x+y
## [1] 21
Al ver que si se pudo realizar la suma sabemos que es de tipo númerico.
##Manejo de datos
*Importa un archivo xlsx llamado “ventas.csv” y guárdalo en un dataframe llamado ventas_data. (que contenga datos ficticios: fecha_venta, articulo, valor del articulo)
library(readxl)
ventas_data <- read_excel("C:/Users/paula/Downloads/ventas.csv.xlsx")
View(ventas_data)
print(ventas_data)
## # A tibble: 5 × 3
## fecha_venta articulo `valor de articulo`
## <chr> <chr> <dbl>
## 1 45721 bolso 90000
## 2 45719 zapatos 150000
## 3 45689 calculadora 70000
## 4 2-feb.25 bolso 90000
## 5 45664 bolso 90000
*¿Cómo se importa un archivo Excel en R utilizando el paquete readxl?
Lo primero que debemos hacer es buscar la ruta de donde se encuentra nuestro documento o la ubicacióon donde guarde mi Excel, luego en nuestro read_excel le pegamos nuestro dirección o ubicación de el documento donde el teneindo en cuenta que el slach tiene que tener esta dirección /.
*¿Cómo se pueden renombrar las columnas de un dataframe en R? cambia el nombre de la primer columna por nombres de clientes ficticios.
Lo podemos renombrar con el numero de fila y columna y el nombre que deseemos. *
library(readxl)
ventas_data <- read_excel("C:/Users/paula/Downloads/ventas.csv.xlsx")
View(ventas_data)
ventas_data[1,1]<-"Mani"
ventas_data[2,1]<-"Ana"
ventas_data[3,1]<-"Sara"
ventas_data[4,1]<-"Marlon"
ventas_data[5,1]<-"Santiago"
print(ventas_data)
## # A tibble: 5 × 3
## fecha_venta articulo `valor de articulo`
## <chr> <chr> <dbl>
## 1 Mani bolso 90000
## 2 Ana zapatos 150000
## 3 Sara calculadora 70000
## 4 Marlon bolso 90000
## 5 Santiago bolso 90000
*Crea un dataframe llamado empresa con 3 columnas: “Rol en la compañia (carácter),”Horas de trabajo” (numérico) y “Permisos en el mes” (numérico). Añade cinco filas con datos ficticios.
Rol.Comp<-c("Contador","Administrador","Gerente","Conserje","Atención.cliente")
H.trabajo<-c(6,8,4,5,9)
Permisos<-c(1,2,3,1,2)
empresa<-data.frame(Rol.Comp,H.trabajo,Permisos)
empresa
## Rol.Comp H.trabajo Permisos
## 1 Contador 6 1
## 2 Administrador 8 2
## 3 Gerente 4 3
## 4 Conserje 5 1
## 5 Atención.cliente 9 2
Rol.Comp<-c("Contador","Administrador","Gerente","Conserje","Atención.cliente")
H.trabajo<-c(6,8,4,5,9)
Permisos<-c(1,2,3,1,2)
empresa<-data.frame(Rol.Comp,H.trabajo,Permisos)
empresa
## Rol.Comp H.trabajo Permisos
## 1 Contador 6 1
## 2 Administrador 8 2
## 3 Gerente 4 3
## 4 Conserje 5 1
## 5 Atención.cliente 9 2
Contador<-data.frame(Rol.Com="Contador",H.trabajo=6,Permisos=1)
Administrador<-data.frame(Rol.Com="Administrador",H.trabajo=8,Permisos=2)
Gerente<-data.frame(Rol.Com="Gerente",H.trabajo=4,Permisos=3)
Conserje<-data.frame(Rol.Com="Conserje",H.trabajo=5,Permisos=1)
Atención.cliente<-data.frame(Rol.Com="Atenció.cliente",H.trabajo=9,Permisos=2)
##Operaciones basicas
*Utiliza el ultimo vector creado (de 1 a 10) y Calcula la diferencia entre el tercer y el octavo elemento del vector.
x<-c(1,2,3,4,5,6,7,8,9,10)
x
## [1] 1 2 3 4 5 6 7 8 9 10
A=3
B=8
A-B
## [1] -5
x=9
y=12
x+y
## [1] 21