diff --git a/0401-bot-frameworks-commits-event.png b/0401-bot-frameworks-commits-event.png
new file mode 100644
index 0000000..e22aaeb
Binary files /dev/null and b/0401-bot-frameworks-commits-event.png differ
diff --git a/0401-bot-frameworks-commits-testing.png b/0401-bot-frameworks-commits-testing.png
new file mode 100644
index 0000000..f720540
Binary files /dev/null and b/0401-bot-frameworks-commits-testing.png differ
diff --git a/commit_analysis/testing-share-plotting.R b/commit_analysis/testing-share-plotting.R
index 87f025e..b5a2c07 100644
--- a/commit_analysis/testing-share-plotting.R
+++ b/commit_analysis/testing-share-plotting.R
@@ -27,9 +27,8 @@ long_df <- input_df |>
                values_to = "lengthened_commit_count")
 
 summarized_df <- long_df |>
-  group_by(relative_week, commit_type) |>
-  summarise(total_commit_count = sum(lengthened_commit_count, na.rm = TRUE)) |>
-  mutate(rd_event="release")
+  group_by(relative_week, commit_type, rd_event) |>
+  summarise(total_commit_count = sum(lengthened_commit_count, na.rm = TRUE)) 
 #long_df <- input_df |>
 #  tidyr::pivot_longer(cols = c(wmf_ft_commit_count, unaff_ft_commit_count, nonbot_commit_count),
 #               names_to = "commit_type",
@@ -41,7 +40,7 @@ summarized_df <- long_df |>
 #  mutate(scaled_long_commits = lengthened_commit_count / 10) 
 
 
-window_num <- 4
+window_num <- 8
 final_long_df <- summarized_df |>
   filter(relative_week >= (- window_num) & relative_week <= (window_num)) 
 
@@ -66,8 +65,7 @@ commit_plot <- final_long_df |>
   theme(legend.position = "top")
 commit_plot
 
-
-ggsave(filename = "0316-bot-frameworks-commits-event.png", plot = commit_plot, width = 15, height = 9, dpi = 800)
+ggsave(filename = "0401-bot-frameworks-commits-event.png", plot = commit_plot, width = 15, height = 9, dpi = 800)
 
 total_commit_plot <- final_long_df |>
   ggplot(aes(x=relative_week, 
diff --git a/mgaughan-rstudio-server_25101978.out b/mgaughan-rstudio-server_25101978.out
index d737580..31173fa 100644
--- a/mgaughan-rstudio-server_25101978.out
+++ b/mgaughan-rstudio-server_25101978.out
@@ -15,3 +15,4 @@ When done using RStudio Server, terminate the job by:
 2. Issue the following command on the login node:
 
       scancel -f 25101978
+slurmstepd: error: *** JOB 25101978 ON n3439 CANCELLED AT 2025-04-01T10:12:30 DUE TO TIME LIMIT ***
diff --git a/mgaughan-rstudio-server_25104883.out b/mgaughan-rstudio-server_25104883.out
new file mode 100644
index 0000000..3b407df
--- /dev/null
+++ b/mgaughan-rstudio-server_25104883.out
@@ -0,0 +1,17 @@
+1. SSH tunnel from your workstation using the following command:
+
+   ssh -N -L 8787:n3439:60911 mjilg@klone.hyak.uw.edu
+
+   and point your web browser to http://localhost:8787
+
+2. log in to RStudio Server using the following credentials:
+
+   user: mjilg
+   password: EKa4WB0aZn3MeC3Huz21
+
+When done using RStudio Server, terminate the job by:
+
+1. Exit the RStudio Session ("power" button in the top right corner of the RStudio window)
+2. Issue the following command on the login node:
+
+      scancel -f 25104883