# Example with constant design and no correlation
data(estimates_constant)
data(var_constant)
pb <- plausible_bounds(estimates_constant[1:4], var_constant[1:4, 1:4])
pb_df <- summary(pb)
print(pb_df)
Run the code above in your browser using DataLab