aboutsummaryrefslogtreecommitdiff
path: root/scripts
diff options
context:
space:
mode:
authorThomas White <taw@physics.org>2014-09-18 18:10:11 +0200
committerThomas White <taw@physics.org>2014-09-18 18:10:11 +0200
commit0a533227b1006b4019ea9fccd0957e8be7138f8d (patch)
treed2ff9c81c5ececd501f404388a620eaee9a57f19 /scripts
parent0b1fa4693e4c4df54623cfeb91b3c887191236fa (diff)
Tidy up scaling/CCs a bit
Diffstat (limited to 'scripts')
-rw-r--r--scripts/plot-cc-and-scale.R4
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/plot-cc-and-scale.R b/scripts/plot-cc-and-scale.R
index 75850e85..25df0a63 100644
--- a/scripts/plot-cc-and-scale.R
+++ b/scripts/plot-cc-and-scale.R
@@ -2,7 +2,7 @@
#
# by Takanori Nakane (nakane.t@gmail.com)
-scale_cc <- read.table("scale.csv", sep=",", col.names=c("ImageName", "ScaleFactor", "CC"))
+scale_cc <- read.table("stats.dat", sep=" ", col.names=c("ImageName", "ScaleFactor", "CC"))
# scatter plot
# FIXME: sometimes white lines appear on the plot.
@@ -20,4 +20,4 @@ abline(h=mean(sf[,2])+(-5:5)*sd(sf[,2]), col=2)
hist(scale_cc$ScaleFactor, breaks=100, main="Distribution of Scale Factor", xlab="Scale Factor")
abline(v=mean(sf[,2])+(-5:5)*sd(sf[,2]), col=2)
-par(mfrow=c(1,1)) \ No newline at end of file
+par(mfrow=c(1,1))