R/y.loc.R

y.loc <-
function (perc.loc) 
{
    usr.out <- par("usr")
    return(usr.out[3] + perc.loc * (usr.out[4] - usr.out[3]))
}
Auburngrads/SMRD documentation built on Sept. 14, 2020, 2:21 a.m.