Changing linetype in ggplot

Question

I created a figure from the following code:

ggplot(data = irrigation2 , aes(x = date)) +
  #Events
  geom_col(data = irrigation2 , aes(y = iamt , fill = \'Irr