# Plot line graph

year<-c(1990:2005)

num<-c(3,2,4,7,6,22,9,31,12,30,17,23,21,36,41,21)

df<-data.frame(year,num)

str(df)
## 'data.frame':    16 obs. of  2 variables:
##  $ year: int  1990 1991 1992 1993 1994 1995 1996 1997 1998 1999 ...
##  $ num : num  3 2 4 7 6 22 9 31 12 30 ...
library(ggplot2)
## Warning: package 'ggplot2' was built under R version 3.3.3
ggplot(data=df,aes(x=year,y=num)) + geom_line() + theme_bw() + ylab("Number of publicaitons") +
  xlab("Year") + geom_point() + scale_x_continuous(breaks = seq(1990,2005,by=1))