a<-read.table("100ns_10000frames_RMSD_1.dat")
b<-read.table("100ns_10000frames_RMSD_2.dat")
c<-read.table("100ns_10000frames_RMSD_3.dat")
d<-read.table("100ns_10000frames_RMSD_4.dat")
e<-read.table("100ns_10000frames_RMSD_5.dat")
f<-read.table("100ns_10000frames_RMSD_6.dat")
g<-read.table("100ns_10000frames_RMSD_7.dat")


pdf("rmsdplot.pdf", w=12)
plot(a, ylim=c(1,5))
lines(b)
lines(c)
lines(d)
dev.off()