updated LLM plot

cicl-stanford · Jul 20, 2024 · 3918f28 · 3918f28
1 parent fb047a4
commit 3918f28
Show file tree

Hide file tree

Showing 12 changed files with 213 additions and 147 deletions.
diff --git a/code/R/teleological_properties.Rmd b/code/R/teleological_properties.Rmd
@@ -326,7 +326,7 @@ ggplot(data = df.exp2.long,
   scale_y_continuous(breaks = 1:7) +
   scale_shape_manual(values = c(21, 23)) + 
   ggtitle("What is this creature?") +
-  xlab("Property type of creature \n\ that differed") +
+  xlab("Property type that \n\ differed") +
   theme(plot.title = element_text(size=24, hjust = .5),  
         legend.title = element_blank(),
         legend.position = "bottom",
@@ -605,11 +605,6 @@ ggplot(data = df.llm,
                                              jitter.width = 0.1,
                                              jitter.height = 0.0),
              alpha = 0.2) + 
-  stat_summary(fun.data = "mean_cl_boot",
-               position = position_dodge(width = 0.5),
-               shape = 21,
-               color = "black",
-               size = .5) + 
   scale_fill_brewer(palette = "Set1") + 
   scale_color_brewer(palette = "Set1") + 
  # scale_y_continuous(breaks = 1:7) +
@@ -621,7 +616,7 @@ ggplot(data = df.llm,
         text = element_text(size = 18)) + 
   facet_wrap(~ model)
 
-ggsave(width = 8, height = 3, "../../figures/experiment2/bert_overall_property_means.pdf")
+ggsave(width = 8, height = 3, "../../figures/experiment2/bert_overall_probabilities.pdf")
 
 ```
 
@@ -714,7 +709,7 @@ ggplot(data = df.exp3.long,
   scale_y_continuous(breaks = 1:7) +
   scale_shape_manual(values = c(21, 23)) + 
   ggtitle("What is this creature?") +
-  xlab("Property type of creature \n\ that differed") +
+  xlab("Property type that \n\ differed") +
   theme(plot.title = element_text(size=24, hjust = .5),  
         legend.title = element_blank(),
         legend.position = "bottom",
@@ -913,7 +908,7 @@ ggplot(data = df.exp4.long,
   scale_y_continuous(breaks = 1:7) +
   scale_shape_manual(values = c(21, 23)) + 
   ggtitle("What is this creature?") +
-  xlab("Property type of creature \n\ that differed") +
+  xlab("Property type that \n\ differed") +
   theme(plot.title = element_text(size=24, hjust = .5),  
         legend.title = element_blank(),
         legend.position = "bottom",

diff --git a/code/R/teleological_properties.html b/code/R/teleological_properties.html
diff --git a/figures/experiment1/exp1_top_stacked.pdf b/figures/experiment1/exp1_top_stacked.pdf
diff --git a/figures/experiment2/bert_overall_probabilities.pdf b/figures/experiment2/bert_overall_probabilities.pdf
diff --git a/figures/experiment2/bert_overall_property_means.pdf b/figures/experiment2/bert_overall_property_means.pdf
diff --git a/figures/experiment2/exp2_expected_property_selections_for_property_type_ratings.pdf b/figures/experiment2/exp2_expected_property_selections_for_property_type_ratings.pdf
diff --git a/figures/experiment2/exp2_heat_map.pdf b/figures/experiment2/exp2_heat_map.pdf
diff --git a/figures/experiment2/exp2_property_by_condition_means.pdf b/figures/experiment2/exp2_property_by_condition_means.pdf
diff --git a/figures/experiment3/exp3_heat_map.pdf b/figures/experiment3/exp3_heat_map.pdf
diff --git a/figures/experiment3/exp3_property_by_condition_means.pdf b/figures/experiment3/exp3_property_by_condition_means.pdf
diff --git a/figures/experiment4/exp4_heat_map.pdf b/figures/experiment4/exp4_heat_map.pdf
diff --git a/figures/experiment4/exp4_property_by_condition_means.pdf b/figures/experiment4/exp4_property_by_condition_means.pdf