Description

Using the Economics Journal Subscription Dataset, I want to address the following question: How does the subscription price affects the number of subscriptions.  This dataset contains data on 180 economics journals for the year 2000.

I used two variables. The dependent variable “libprice” is the subscription price. The independent variable “oclc” is the number of subscriptions. 

I used the following codes for my scatter plot:

> library(readxl)

> journals <- read_excel("Desktop/journals.xlsx")

> View(journals) 

> ggplot(data=journals, aes(x=libprice, y=oclc)) + geom_point() + geom_smooth(method ='lm', se=FALSE) + labs(title ="Economics Journal Subscription Data", x="Subscription Price", y="Number of Subscriptions", caption = "Anna Sobolkova")