diff --git a/code/02_preprocessing_8o8m.R b/code/01_preprocessing_8o8m.R similarity index 100% rename from code/02_preprocessing_8o8m.R rename to code/01_preprocessing_8o8m.R diff --git a/code/02_preprocessing_haum.R b/code/01_preprocessing_haum.R similarity index 100% rename from code/02_preprocessing_haum.R rename to code/01_preprocessing_haum.R diff --git a/code/metadata.R b/code/02_metadata_haum.R similarity index 100% rename from code/metadata.R rename to code/02_metadata_haum.R diff --git a/code/plots_8o8m.R b/code/03_plots_8o8m.R similarity index 100% rename from code/plots_8o8m.R rename to code/03_plots_8o8m.R diff --git a/code/visualization.R b/code/03_plots_haum.R similarity index 100% rename from code/visualization.R rename to code/03_plots_haum.R diff --git a/code/03_modeling.R b/code/04_modeling_haum.R similarity index 100% rename from code/03_modeling.R rename to code/04_modeling_haum.R diff --git a/code/overview_artworks_8o8m.R b/code/overview_artworks_8o8m.R index 91b395f..289eadd 100644 --- a/code/overview_artworks_8o8m.R +++ b/code/overview_artworks_8o8m.R @@ -4,7 +4,7 @@ # function, so everybody can do it??? devtools::load_all("../../../../software/mtt") -fname <- "../overview_artworks_8o8m.tex" +fname <- "../museums/overview_artworks_8o8m.tex" if (file.exists(fname)) file.remove(fname) path <- "C:/Users/nwickelmaier/Nextcloud/Documents/MDS/2023ss/60100_master_thesis/data/8o8m/Content8o8m" diff --git a/code/overview_artworks_haum.R b/code/overview_artworks_haum.R index c11e3a1..1530655 100644 --- a/code/overview_artworks_haum.R +++ b/code/overview_artworks_haum.R @@ -2,10 +2,10 @@ devtools::load_all("../../../../software/mtt") -fname <- "../haum/overview_artworks.tex" +fname <- "../museums/overview_artworks_haum.tex" if (file.exists(fname)) file.remove(fname) -xmlpath <- "C:/Users/nwickelmaier/Nextcloud/Documents/MDS/2023ss/60100_master_thesis/data/ContentEyevisit/eyevisit_cards_light" +xmlpath <- "C:/Users/nwickelmaier/Nextcloud/Documents/MDS/2023ss/60100_master_thesis/data/haum/ContentEyevisit/eyevisit_cards_light" artworks <- dir(path = xmlpath) artworks <- artworks[artworks != "glossar"] diff --git a/code/questions_data-inconsistencies.R b/code/questions/questions_data-inconsistencies.R similarity index 100% rename from code/questions_data-inconsistencies.R rename to code/questions/questions_data-inconsistencies.R diff --git a/code/questions_number-of-cards.R b/code/questions/questions_number-of-cards.R similarity index 100% rename from code/questions_number-of-cards.R rename to code/questions/questions_number-of-cards.R diff --git a/code/questions_programming-input.R b/code/questions/questions_programming-input.R similarity index 100% rename from code/questions_programming-input.R rename to code/questions/questions_programming-input.R