diff --git a/StudentData/README.md b/StudentData/README.md index aadeef6..93e14f1 100644 --- a/StudentData/README.md +++ b/StudentData/README.md @@ -18,14 +18,15 @@ _You may need to use a more creative path name to read an Rds in the StudentData **pixl_sol_coordinates.Rds** has all of the data in samples_pixl_wide.Rds with the latitude, longitude and sol found from the analysts notebook. -**libs_v1** all the libs data with the columns renamed (meta data capitalized) so that they match with the other datasets and reordered to match with other data sets. +**v1_libs** all the libs data with the columns renamed (meta data capitalized) so that they match with the other datasets and reordered to match with other data sets. -**pixl_v1** all the pixl data with the columns renamed and reordered to match libs. +**v1_pixl** all the pixl data with the columns renamed and reordered to match libs. -**sherloc_v1** all the sherloc data, but after it's been turned into a data frame in the same format as sherloc. +**v1_sherloc** all the sherloc data, but after it's been turned into a data frame in the same format as sherloc. -**lithology_v1** all the lithology data with the columns renamed and reordered to match sherloc. +**v1_lithology** all the lithology data with the columns renamed and reordered to match sherloc. -**sample_meta** all the meta data for the samples. This can be appended to pixl, sherloc, and lithology. +**v1_sample_meta** all the meta data for the samples. This can be appended to pixl, sherloc, and lithology. + +**v1_mineral_classes** data set containing all the minerals along with features of the minerals (Such as: Oxide/Chlorite/Sulfate/etc, and Aqueous/Not-Aqueous). -**libs_typed.Rds** the libs data with a "type" column added that contains descriptors of the scct samples, as well as other sample descriptors from the analysts notebook diff --git a/StudentData/mineral_classes.Rmd b/StudentData/mineral_classes.Rmd new file mode 100644 index 0000000..c9d6842 --- /dev/null +++ b/StudentData/mineral_classes.Rmd @@ -0,0 +1,42 @@ + +# Importing data frames +```{r} + +# Mineral names +lithology.df <- readRDS("~/DAR-Mars-F24/StudentData/v1_lithology.Rds") +Mineral <- colnames(lithology.df[,-1]) + +# Aqueous or not +Aqueuous <- c(NA,NA,NA,NA, # "Plagioclase", "Sulfate", "Ca-sulfate", "Hydrated Ca-sulfate" + NA,NA,NA,NA, # "Mg-sulfate", "Hydrated Sulfates", "Hydrated Mg-Fe sulfate", Perchlorates" + NA,NA,NA,NA, # "Na-perchlorate", "Amorphous Silicate", "Phosphate", "Pyroxene" + NA,NA,NA,NA, # "Olivine", "Carbonate", "Fe-Mg carbonate", "Hydrated Carbonates" + NA,NA,NA,NA, # "Disordered Silicates", "Feldspar", "Quartz", "Apatite" + NA,NA,NA,NA, # "FeTi oxides", "Halite", "Iron oxide", "Hydrated Iron oxide" + NA,NA,NA,NA, # "Organic matter", "Sulfate+Organic matclasster", "Other hydrated phases", "Phyllosilicates" + NA,NA,NA,NA, # "Chlorite", "Kaolinite (hydrous Al-clay)", "Chromite", "Ilmenite" + NA,NA,NA) # "Zircon/Baddeleyite", "Fe-Mg-clay minerals", "Spinels" + + +# +Type <- c("NA","Sulfate","Sulfate","Sulfate", + "Sulfate","Sulfate","Sulfate","Perchlorate", + "Perchlorate","Silicate","Phosphate","NA", + "NA","Carbonate","Carbonate","Catbonate", + "Silicate","NA","NA","Apatite", + "Oxide","Halite","Oxide","Oxide", + "NA","Sulfate","NA","Silicate", + "Chlorite", "Kaolinite", "Chromite", "Ilmenite", + "NA","NA","NA") +Type <- as.factor(Type) +``` + +# Creating info data frame +```{r} +minerals.df <- data.frame(Mineral,Type,Aqueuous) +``` + +# Saving new data frames +```{r} +saveRDS(minerals.df, "v1_mineral_classes.Rds") +``` \ No newline at end of file diff --git a/StudentData/v1_mineral_classes.Rds b/StudentData/v1_mineral_classes.Rds new file mode 100644 index 0000000..9951610 Binary files /dev/null and b/StudentData/v1_mineral_classes.Rds differ