From 11f7ef466d8861910904047fcc3bfc4bbbebba32 Mon Sep 17 00:00:00 2001 From: Naeem Model Date: Thu, 22 Jun 2023 05:55:31 +0000 Subject: Shorten line length in doc examples --- R/seqB.R | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'R') diff --git a/R/seqB.R b/R/seqB.R index a64b598..8685f39 100644 --- a/R/seqB.R +++ b/R/seqB.R @@ -59,12 +59,14 @@ #' abline(h=1/(20/0.01+1), col="red") #' abline(v=res1$Rhat, col="blue") #' abline(v=Rpost$supp[loc], col="purple") -#' legend("topright", legend=c("prior", "posterior", "posterior mean (Rhat)", "posterior mode"), col=c("red", "black", "blue", "purple"), lty=1) +#' legend("topright", legend=c("prior", "posterior", "posterior mean (Rhat)", "posterior mode"), +#' col=c("red", "black", "blue", "purple"), lty=1) #' plot(Rpost$supp, Rpost$pmf, col="black", type="l", xlim=c(0.5, 1.5), xlab="", ylab="") #' abline(h=1/(20/0.01+1), col="red") #' abline(v=res1$Rhat, col="blue") #' abline(v=Rpost$supp[loc], col="purple") -#' legend("topright", legend=c("prior", "posterior", "posterior mean (Rhat)", "posterior mode"), col=c("red", "black", "blue", "purple"), lty=1) +#' legend("topright", legend=c("prior", "posterior", "posterior mean (Rhat)", "posterior mode"), +#' col=c("red", "black", "blue", "purple"), lty=1) #' #' ## ========================================================= ## #' ## Compute Rhat using only the first five weeks of data ## -- cgit v1.2.3