NuoWenLei · June 13, 2022 02:54
diff --git a/.gitignore b/.gitignore
 .Rproj.user
 .Rhistory
 .RData
 .Ruserdata

 *.Rproj
diff --git a/gist_test_image b/gist_test_image
diff --git a/new_R.R b/new_R.R
 library(tidyverse)
 library(primer.data)

 ggplot(data = qscores,
       mapping = aes(x = rating)) +
  geom_histogram(bins = 5,
                 color = "white",
                 fill = "coral") +
  labs(title = "Histogram of Student Ratings of Harvard Classes",
       subtitle = "Ratings of 1 and 2 are very rare",
       x = "Rating",
       y = "Count",
       caption = "Source: Harvard Q-Guide (2018-2019)")
	library(tidyverse)
	library(primer.data)

	ggplot(data = qscores,
	mapping = aes(x = rating)) +
	geom_histogram(bins = 5,
	color = "white",
	fill = "coral") +
	labs(title = "Histogram of Student Ratings of Harvard Classes",
	subtitle = "Ratings of 1 and 2 are very rare",
	x = "Rating",
	y = "Count",
	caption = "Source: Harvard Q-Guide (2018-2019)")