# NOT RUN {
data_df <- test_psychometrics %>%
total_scores(x = starts_with('x_'),
y = starts_with('y_'),
z = starts_with('z_'))
scatterplot_matrix(data_df, x, y, z)
# }
Run the code above in your browser using DataLab