R/sirt_define_eps_sequence.R

Defines functions sirt_define_eps_sequence

## File Name: sirt_define_eps_sequence.R
## File Version: 0.01

sirt_define_eps_sequence <- function(eps, eps_vec)
{
    eps_vec <- unique(c(eps_vec, eps))
    eps_vec <- eps_vec[ order(eps_vec, decreasing=TRUE) ]
    eps_vec <- eps_vec[ eps_vec >=eps ]
    return(eps_vec)
}

Try the sirt package in your browser

Any scripts or data that you put into this service are public.

sirt documentation built on May 29, 2024, 8:43 a.m.