# Example with simulated data
chain_data <- data.frame(
log_N = rnorm(1000, mean = 1.5, sd = 0.1),
log_k0 = rnorm(1000, mean = -0.5, sd = 0.2)
)
# Check convergence
results <- check_gaussian_convergence(chain_data)
# Plot diagnostics
plot(results)
# With custom parameter names
plot(results, param_names = c("Dimensions (log)", "Spring constant (log)"))
Run the code above in your browser using DataLab