diff --git a/.gitignore b/.gitignore
index 4c5dd06..154e44e 100644
--- a/.gitignore
+++ b/.gitignore
@@ -45,8 +45,7 @@ Thumbs.db
 .Rproj.user
 .Rhistory
 
-#Image files#
-*.png
+
 
 # Files to ignore because they are huge files
 
diff --git a/NIH_Grants.R b/NIH_Grants.R
index 21142f4..f1fe8a1 100644
--- a/NIH_Grants.R
+++ b/NIH_Grants.R
@@ -149,6 +149,33 @@ datatable(MYSTATE_ABBREVIATION_NIH_data_2023)
 # you can always edit the .gitignore file if you want to change how 
 # things are handled. 
 
+#do you want to see how your state compares to other states? Try this: 
+
+
+NIH_BY_STATE <- NIH_data_split_year %>%
+  filter(AWARD_NOTICE_DATE_YEAR == 2023) %>%
+  filter(ORG_COUNTRY == "UNITED STATES") %>%
+  filter(TOTAL_COST > 1000000) %>%
+  group_by(ORG_STATE) %>%
+  summarize(TOTAL_COST = sum(TOTAL_COST, na.rm=TRUE)) %>%
+  arrange(desc(TOTAL_COST))
+
+write.csv(NIH_BY_STATE,"/Users/lisawilliams/code/R_For_Mass_Communications/NIH_Data/NIH_BY_STATE_2023.csv", row.names = FALSE)
+
+
+plot_NIH_by_state <- ggplot(NIH_BY_STATE,
+                            aes(x=reorder(NIH_BY_STATE$ORG_STATE, 
+                                          NIH_BY_STATE$TOTAL_COST), 
+                                y=NIH_BY_STATE$TOTAL_COST)) +
+  geom_bar(stat="identity", fill="dodgerblue") +
+  scale_y_continuous(labels = scales::dollar_format(scale = .000001, suffix = "M"))+
+  #geom_text(aes(label = signif(TOTAL_COST)), nudge_y = 3) +
+  coord_flip() +
+  labs(x="", y="")+
+  ggtitle("NIH Funding By US State/Territory, 2023",
+          subtitle = "Data from NIH RePORTER")
+
+plot_NIH_by_state + theme_light()
 
 
 
diff --git a/example_plot_1.png b/example_plot_1.png
new file mode 100644
index 0000000..b800a08
Binary files /dev/null and b/example_plot_1.png differ
diff --git a/example_plot_2.png b/example_plot_2.png
new file mode 100644
index 0000000..ff7b2d7
Binary files /dev/null and b/example_plot_2.png differ
diff --git a/example_plot_3.png b/example_plot_3.png
new file mode 100644
index 0000000..d9311d4
Binary files /dev/null and b/example_plot_3.png differ