## Plot the Response Densities in Basket Trials

### Description

The MEM analysis calculates the probability of exchangeability of baskets and clusters in a basket trial. This function creates density plots of the response rates of each basket or each cluster under the MEM design taking into account the extent to which power can be borrowed from similar trials.

### Usage

plot_density(x, ...)


### Arguments

 x the exchangeability model. ... other options. See Details for more information.

### Details

The ... options can be used to specify the colors of the response density plot or, when plotting an object of class 'exchangeability_model' the type can be specified. In this case, the default is 'type = c("both", "basket", "cluster")'.

### Examples


# Create an MEM analysis of the Vemurafenib trial data.
data(vemu_wide)

mem_analysis <- mem_exact(
vemu_wide$responders, vemu_wide$evaluable,