# Load the dataset
data(japan_neutro)
# View the first few rows
head(japan_neutro)
# Calculate basic metrics
metrics <- compute_all_metrics(japan_neutro)
print(metrics$mean_interval_X) # Mean of auxiliary variable
print(metrics$mean_interval_Y) # Mean of study variable
Run the code above in your browser using DataLab