Displaying 1 result from an estimated 1 matches for "dyr".
Did you mean:
dir
2002 Mar 22
0
sequential t-test - replies
...uot;, n, "\t", U0[n], "\t", U1[n])
}
#
# make a plot to provide hard-copy for users
#
ttl <- paste("delta=", delta, "alpha=", alpha, "beta=", beta)
yr <- range(na.omit(c(U0, U1)))
# dyr <- max(yr) - min(yr)
# yr <- c(yr[1] - 0.2 * dyr, yr[2] + 0.2 * dyr)
pyr <- pretty(yr)
plot(c(1, maxn), yr, type = "n", xlab = "Sample no.", ylab = "",
main = ttl)
lines(1:maxn, U0, lwd = 5, col = 13)
lines(1:maxn...