Tengo unos datos de concentración de contaminantes atmosféricos organizados en 15 variables, entre las cuales se encuentra la fecha, el lugar, y los contaminantes. En esta última se encuentran los contaminantes PM2.5, PM10, entre otros.
Quisiera saber cómo puedo cambiar esta variable de contaminantes, y separarla para que cada contaminante sea una variable. Es decir, pasar los datos de esa columna, a una fila con sus respectivos datos.
A continuación comparto una muestra de los datos:
structure(list(date = structure(c(1199145600, 1199149200, 1199152800,
1199156400, 1199160000, 1199163600), class = c("POSIXct", "POSIXt"
), tzone = "UTC"), Value = c(NA_real_, NA_real_, NA_real_, NA_real_,
NA_real_, NA_real_), site = c("AGUINAGA", "AGUINAGA", "AGUINAGA",
"AGUINAGA", "AGUINAGA", "AGUINAGA"), EnvAut = c("A.M. VALLE DE ABURRA",
"A.M. VALLE DE ABURRA", "A.M. VALLE DE ABURRA", "A.M. VALLE DE ABURRA",
"A.M. VALLE DE ABURRA", "A.M. VALLE DE ABURRA"), Latitude = c(6.2531,
6.2531, 6.2531, 6.2531, 6.2531, 6.2531), Longitude = c(-75.568636,
-75.568636, -75.568636, -75.568636, -75.568636, -75.568636),
AveragingTimeHours = c(1, 1, 1, 1, 1, 1), Year = c(2008,
2008, 2008, 2008, 2008, 2008), Var = c("PM2.5", "PM2.5",
"PM2.5", "PM2.5", "PM2.5", "PM2.5"), Units = c("ugm3", "ugm3",
"ugm3", "ugm3", "ugm3", "ugm3"), COD_DEP = c(5, 5, 5, 5,
5, 5), NOM_DEP = c("ANTIOQUIA", "ANTIOQUIA", "ANTIOQUIA",
"ANTIOQUIA", "ANTIOQUIA", "ANTIOQUIA"), COD_MUN = c(5001,
5001, 5001, 5001, 5001, 5001), NOM_MUN = c("MEDELL<cd>N",
"MEDELL<cd>N", "MEDELL<cd>N", "MEDELL<cd>N", "MEDELL<cd>N",
"MEDELL<cd>N"), StationType = c("Fija", "Fija", "Fija", "Fija",
"Fija", "Fija")), spec = structure(list(cols = list(date = structure(list(
format = "%d/%m/%Y %H:%M"), class = c("collector_datetime",
"collector")), Value = structure(list(), class = c("collector_number",
"collector")), site = structure(list(), class = c("collector_character",
"collector")), EnvAut = structure(list(), class = c("collector_character",
"collector")), Latitude = structure(list(), class = c("collector_double",
"collector")), Longitude = structure(list(), class = c("collector_double",
"collector")), AveragingTimeHours = structure(list(), class = c("collector_double",
"collector")), Year = structure(list(), class = c("collector_number",
"collector")), Var = structure(list(), class = c("collector_character",
"collector")), Units = structure(list(), class = c("collector_character",
"collector")), COD_DEP = structure(list(), class = c("collector_double",
"collector")), NOM_DEP = structure(list(), class = c("collector_character",
"collector")), COD_MUN = structure(list(), class = c("collector_double",
"collector")), NOM_MUN = structure(list(), class = c("collector_character",
"collector")), StationType = structure(list(), class = c("collector_character",
"collector"))), default = structure(list(), class = c("collector_guess",
"collector")), skip = 1), class = "col_spec"), row.names = c(NA,
6L), class = c("spec_tbl_df", "tbl_df", "tbl", "data.frame"))
Muchas Gracias por su colaboración.
dput(head(df)
(df
es el nombre de tu dataframe) así podremos ayudarte.