Estoy tratando de aplicar un archivo de columnas y filtros al diamonds dataset.
El archivo de columnos está en este link: https://github.com/illyabjazevic/some_columns_and_filters_diamonds_dataset/blob/main/my_variables_february.csv
Lo que he hecho es aplicar este Código para hacer un data cleaning.
Quisiera aplicar estas columnas y filtros al diamonds dataset. Pero, no quiero hacerlo manualmente.
Se me ocurre que un loop debe funcionar.
La columna V1 son las columnas que quiero del diamond dataset. La volumna V2 son los filtros de esas columnas.
Pueden ayudarme?
De antemano, muchísimas gracias.
library(stringr)
library(dplyr)
library(ggplot2)
DF <- read.csv("my_variables_february.csv", header = FALSE)
View(DF)
DF <- DF %>% mutate(V2 = str_replace_all(V2, "\\*|\\[|\\]", ""))
View(DF)
DF$V2 <- gsub("\\", "", DF$V2, fixed=TRUE)
View(DF)
DF$V2 <- str_split(DF$V2, ",")
View(DF)
for (x in 1:nrow(DF)){print(DF$V1[[x]])}
for (x in 1:nrow(DF)){print(DF$V2[[x]])}
head(DF)
glimpse(DF)
data(diamonds)
View(diamonds)
subsetDIAMONDS <- diamonds
for (x in 1:nrow(DF)){
print (DF$V1[[x]])
print (DF$V2[[x]])
}
Hasta allí, todo bien. Después de eso intenté lo siguiente, pero no funcionó.
for (x in 1:nrow(DF)){
subsetDIAMONDS <- filter(subsetDIAMONDS, DF$V1[[x]] %in% DF$V2[[x]])
}
También intenté lo siguiente, que tampoco funcionó:
for (i in DF$V1){
for (j in DF$V2)
subsetDIAMONDS <- filter(subsetDIAMONDS, i %in% j)
}