Thank you Mr. Kane for your time, I finally achieve my objective with the
package reshape2

n5dt<-last(dezdiff,5)
n5dt <- as.data.frame(t(n5dt))
n5dt$id <- c(1:35)


subm5dt<-melt(n5dt, id="id", c("2013-06-28", "2013-07-01", "2013-07-02",
"2013-07-03", "2013-07-04") )
 names(subm5dt) <- c("Observations", "variable","BasisPoints")
ggplot(subm5dt, aes(Observations, BasisPoints, col=variable, group=2)) +
geom_line() + facet_grid(variable~., scale="fixed") + geom_point()

Have a nice day!



--
View this message in context: 
http://r.789695.n4.nabble.com/ggplot2-tp4670852p4670931.html
Sent from the R help mailing list archive at Nabble.com.

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to