BCHMplot_post_dist {BCHM}

Plot the posterior distributions of subgroups.

Description

plot the posterior distribution by subgroup ID

Usage

BCHMplot_post_dist(
  res,
  col = res$Result[, 4],
  lty = 1:dim(res$Result)[1],
  lwd = 2,
  xlim = c(0, 1),
  ylim = c(0, 20),
  ...
)

Arguments

res

BCHM calculation results.

col

Color vector

lty

line types

lwd

line width

xlim

X-axis range

ylim

Y-axis range

...

other options

Value

None

See Also

BCHM Perform the analysis based on the BCHM design.

BCHMplot_cluster Plot the clustering results of subgroups.

BCHMplot_post_value Plot the posterior response of subgroups.

Examples

nDat = c(25, 25, 25, 25) # total number of patients
xDat = c(2, 3, 8, 6)  # number of responses
alpha <- 1e-20 
d0 <- 0.0 
alpha1 = 50   
beta1 = 10  
tau2 <- 0.1  
phi1 <- 0.1  
deltaT <- 0.2  
thetaT <- 0.60   

res <- BCHM(nDat = nDat,
            xDat = xDat,
            alpha = alpha,
            d0 = d0,             
            alpha1 = alpha1, 
            beta1 = beta1,
            tau2 = tau2,
            phi1 = phi1, 
            deltaT = deltaT,
            thetaT = thetaT,
            burnIn = 100,
            MCIter = 200,
            MCNum = 1000,
            seed = 1000
)
print(res$SMatrix)
print(res$Result)
col <- res$Result[,4]

BCHMplot_post_dist(res, col, lty=1:length(nDat), lwd =3, xlim=c(0, 0.8))