I want to change Labels in a Legend.
 spi<-read.csv("spill.csv",as.is=TRUE)
 attach(spi)
 spi$date<-as.Date(spi$date)
 str(spi)
 data.frame:   3184 obs. of  3 variables:
 $ data1: chr  "oil to asset" "oil to asset" "oil to asset" "oil to asset" ...
 $ date : Date, format: "2007-01-10" "2007-01-11" ...
 $ sp   : num  7.7 7.95 7.54 7.61 7.67 ...
cont1 <- ggplot(spi,aes(x=date,y=sp,linetype=data1))+geom_line() +
            expand_limits(max(spi$sp), y=c(0,80)) + 
            labs(x = "", y = "") + 
            scale_y_continuous(breaks=seq(0,80,10)) +
            scale_linetype_manual(values = c("dashed","solid")) +  
            scale_x_date(breaks=datebreaks1, labels=date_format("%Y")) +
            ggtitle("Oil and Fianacial Market") +
            annotate("rect", xmin=as.Date("2008-01-02"), xmax=as.Date("2008-06-30"), 
                     ymin=-Inf, ymax=Inf, alpha=.1, fill="blue") +
            theme(legend.position="bottom") + labs(linetype='')  
Then I want to changeing asset to oil and oil to asset.
How I can chahge?
scale_fill_discrete(labels=c("oil to asset" ,"asset to oil"))
This is not working.
Please help me.
 
     
     
    