TGST (version 1.0)

Check.exp.tilt: Check exponential tilt model assumption

Description

This function provides graphical assessment to the suitability of the exponential tilt model for risk score in finding optimal tripartite rules by semiparametric approach. $$g1(s)=exp(\tilde{\beta}_{0}+\beta_{1}*s)*g0(s)$$

Usage

Check.exp.tilt(Z, S)

Arguments

Z

True disease status (No disease / treatment success coded as Z=0, diseased / treatment failure coded as Z=1).

S

Risk score.

Value

Plot of empirical density for risk score S, joint empirical density for (S,Z=1) and (S,Z=0), and the density under the exponential tilt model assumption for (S,Z=1) and (S,Z=0).

Examples

# NOT RUN {
d = Simdata
Z = d$Z # True Disease Status
S = d$S # Risk Score
Check.exp.tilt( Z, S)
# }