powered by
Calculate the intercept of a line
.pcr_intercept(vec, var)
A vector of numerics
A grouping variable
A numeric
# NOT RUN { vec <- rnorm(6, 30, 1) var <- rep(c(.1, .5), 3) pcr:::.pcr_intercept(vec, var) # }
Run the code above in your browser using DataLab