[R-gregmisc-users] SF.net SVN: r-gregmisc: [949] trunk/PathwayModeling/thesispaper/R/plotVi.R

[<r_b...@us...>]

Revision: 949
Author:   r_burrows
Date:     2006-03-25 06:42:14 -0800 (Sat, 25 Mar 2006)
ViewCVS:  http://svn.sourceforge.net/r-gregmisc/?rev=949&view=rev

Log Message:
-----------
added ML curves

Modified Paths:
--------------
    trunk/PathwayModeling/thesispaper/R/plotVi.R
Modified: trunk/PathwayModeling/thesispaper/R/plotVi.R
===================================================================
--- trunk/PathwayModeling/thesispaper/R/plotVi.R	2006-03-25 14:41:09 UTC (rev 948)
+++ trunk/PathwayModeling/thesispaper/R/plotVi.R	2006-03-25 14:42:14 UTC (rev 949)
@@ -17,7 +17,7 @@
     par(new=T)
     plot(times,temp2[[1]],ylim=c(low,high),type="l",xlab="",ylab="",col=2)
     abline(h=0)
-    legend(32,2000,c("data","fitted curve","95% CI"),lty=c(0,1,2),pch=c(1,NA,NA),col=c(1,2,2))
+    legend(32,2000,c("data","fitted curve","95% CI","ML"),lty=c(0,1,2,1),pch=c(1,NA,NA,NA),col=c(1,2,2,3))
     for (i in 3:5) {
         CI <- get95CI(i,input,1,Dsamp)
         low <-min(CI,-400)


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.