From cf90c96c9d8fd8eb2b953de2f7288eec278183eb Mon Sep 17 00:00:00 2001 From: Jason Baldridge Date: Thu, 26 Nov 2015 01:16:46 -0600 Subject: [PATCH] Added jpg output. --- simdata/plot_hyperplane.R | 2 ++ 1 file changed, 2 insertions(+) diff --git a/simdata/plot_hyperplane.R b/simdata/plot_hyperplane.R index 21e20a1..4d08eb3 100644 --- a/simdata/plot_hyperplane.R +++ b/simdata/plot_hyperplane.R @@ -3,6 +3,7 @@ filename = "linear_data_train" data = read.table(paste(filename,".csv",sep=''),header=F,sep=',') colnames(data) = c("label","x","y") +#jpeg("linear_data_hyperplane.jpg") plot(data[,c("x","y")],pch=21,bg=c("orange","blue")[data[,"label"]+1],xlim=c(-.25,1),ylim=c(-.25,1)) abline(h=0,lty=2) abline(v=0,lty=2) @@ -13,3 +14,4 @@ b = 1.57296884 slope = -1*(w0/w1) intercept = -1*(b/w1) abline(coef=c(intercept,slope),lwd=3) +#dev.off() \ No newline at end of file