[R-gregmisc-users] SF.net SVN: r-gregmisc: [1061] trunk/PathwayModeling/thesispaper/priorPlot. Snw

[<wa...@us...>]

Revision: 1061
          http://svn.sourceforge.net/r-gregmisc/?rev=1061&view=rev
Author:   warnes
Date:     2007-03-01 14:43:18 -0800 (Thu, 01 Mar 2007)

Log Message:
-----------
Fix typo

Modified Paths:
--------------
    trunk/PathwayModeling/thesispaper/priorPlot.Snw

Modified: trunk/PathwayModeling/thesispaper/priorPlot.Snw
===================================================================
--- trunk/PathwayModeling/thesispaper/priorPlot.Snw	2007-03-01 22:42:15 UTC (rev 1060)
+++ trunk/PathwayModeling/thesispaper/priorPlot.Snw	2007-03-01 22:43:18 UTC (rev 1061)
@@ -2,7 +2,7 @@
   \centering
 <<priorPlot,echo=F,eval=T,fig=T,width=3,height=3>>=4
 
-f20 <- function(x) dchisq(3*x/20, df=5)
+f <- function(x, mu=20) dchisq(3*x/mu, df=5)
 plot( f, from=0, to=150, xlab=expression(mu[i]), ylab="density", lwd=2)
 abline(v=20,lty=2,lwd=2)
 mtext(text="20", side=1, at=20, line=0.5)


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