https://github.com/cran/IQCC
Tip revision: ef4202fc61e884dce81758e0f31c6f1ae429e523 authored by Emanuel P. Barbosa on 10 March 2010, 00:00:00 UTC
version 0.6
version 0.6
Tip revision: ef4202f
add.data.R
add.data <- function(datum2, estat, T2II, n, j, m = NULL)
{
b <- T2.2(datum2, estat, n)
if(is.null(m) == FALSE)
j <- j + m + 1
points(j, b[1], pch = 16)
c <- c(j, j - 1)
d <- c(b[1], T2II[1])
lines(c, d)
T2II <<- b
}