solve.q: ~~function to do ... ~~

Description Usage Arguments Details Value Note Author(s) References See Also Examples

View source: R/TwoStageAdjustment.r

Description

~~ A concise (1-5 lines) description of what the function does. ~~

Usage

1
solve.q(sorted, m, j, r = 0)

Arguments

sorted

~~Describe sorted here~~

m

~~Describe m here~~

j

~~Describe j here~~

r

~~Describe r here~~

Details

~~ If necessary, more details than the description above ~~

Value

~Describe the value returned If it is a LIST, use

comp1

Description of 'comp1'

comp2

Description of 'comp2'

...

Note

~~further notes~~

~Make other sections like Warning with Warning .... ~

Author(s)

~~who you are~~

References

~put references to the literature/web site here ~

See Also

~~objects to See Also as help, ~~~

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--    or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (sorted, m, j, r = 0) 
{
    a = sorted * (m - r)/(1:m)
    stopifnot(a > 0, j >= 1, j <= m, r >= 0, r <= m)
    adjusted = ifelse(a > 0.5, 1, a/(1 - a))
    temp.min = adjusted[m]
    for (i in m:j) {
        if (adjusted[i] <= temp.min) 
            temp.min = adjusted[i]
        else adjusted[i] = temp.min
    }
    return(adjusted)
  }

mcp.project documentation built on May 2, 2019, 4:52 p.m.