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 File contents
1
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 }