ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/owl/trunk/src/owl/decoyScoring/score_corr_plots.R
Revision: 957
Committed: Fri Feb 12 15:06:04 2010 UTC (10 years, 11 months ago) by duarte
Original Path: trunk/src/proteinstructure/decoyScoring/score_corr_plots.R
File size: 467 byte(s)
Log Message:
Added some useful tools to the default package from my workspace. More clean up.
Line User Rev File contents
1 duarte 957
2    
3     DECOYSETS<-c("4state_reduced", "fisa", "fisa_casp3", "hg_structal", "ig_structal", "ig_structal_hires", "lattice_ssfit")
4    
5    
6     for (set in DECOYSETS) {
7     files<-list.files(path = ".", pattern = paste(set,"_.*.scores",sep=""))
8    
9     cols=0
10     if (length(files)%%2==0) {
11     cols=length(files)/2
12     } else {
13     cols=(length(files)+1)/2
14     }
15     par(mfrow = c(cols, cols))
16    
17     for (file in files) {
18     data<-read.table(file)
19     plot(data$V2,data$V3,xlab="score",ylab="rmsd",main=file)
20     }
21    
22     }