#activate the package
library(ggplot2)

#load the dataframe
ID <- 1:48
solarrad <- c(0,0,0,0,0,0,0,0,0,0,10,22,36,50,68,58,44,96,121,190,250,280,325,349,357,389,322,328,274,232,192,108,184,214,301,350,328,259,258,213,246,148,61,36,24,9,3,0)
my.dataframe <- data.frame(ID, solarrad)

#simple line plot with ggplot
ggplot(my.dataframe, aes(ID, solarrad)) +
  geom_line()

#decorated line plot with ggplot
ggplot(my.dataframe, aes(ID, solarrad)) +
  geom_line(colour="blue", size=2, linetype = "dashed")

#decorated line plot and dots with ggplot
ggplot(my.dataframe, aes(ID, solarrad)) +
  geom_line(colour="blue", size=2, linetype = "dashed") +
  geom_point(size=3, colour="red", shape=16)


#simple line plot with qplot
qplot(ID, solarrad, data = my.dataframe, geom="line")

# decorated line plot with qplot
qplot(ID, solarrad, data = my.dataframe, geom="line", size=I(2), colour=I("blue"), linetype = I("dashed"))


# decorated line plot and dots with qplot
qplot(ID, solarrad, data = my.dataframe, geom="line", size=I(2), colour=I("blue"), linetype = I("dashed")) +
  geom_point(size=3, colour="red", shape=16)