- const int n_rows = heading_rows + cmd->n_posthoc * pvw->n_groups * (pvw->n_groups - 1);
-
- struct tab_table *t = tab_create (n_cols, n_rows);
-
- tab_headers (t, heading_cols, 0, heading_rows, 0);
-
- /* Put a frame around the entire box, and vertical lines inside */
- tab_box (t,
- TAL_2, TAL_2,
- -1, -1,
- 0, 0,
- n_cols - 1, n_rows - 1);
-
- tab_box (t,
- -1, -1,
- -1, TAL_1,
- heading_cols, 0,
- n_cols - 1, n_rows - 1);
-
- tab_vline (t, TAL_2, heading_cols, 0, n_rows - 1);
-
- tab_title (t, _("Multiple Comparisons"));
-
- tab_text_format (t, 1, 1, TAB_LEFT | TAT_TITLE, _("(I) %s"), var_to_string (cmd->indep_var));
- tab_text_format (t, 2, 1, TAB_LEFT | TAT_TITLE, _("(J) %s"), var_to_string (cmd->indep_var));
- tab_text (t, 3, 0, TAB_CENTER | TAT_TITLE, _("Mean Difference"));
- tab_text (t, 3, 1, TAB_CENTER | TAT_TITLE, _("(I - J)"));
- tab_text (t, 4, 1, TAB_CENTER | TAT_TITLE, _("Std. Error"));
- tab_text (t, 5, 1, TAB_CENTER | TAT_TITLE, _("Sig."));
-
- tab_joint_text_format (t, 6, 0, 7, 0, TAB_CENTER | TAT_TITLE,
- _("%g%% Confidence Interval"),
- (1 - cmd->alpha) * 100.0);
-
- tab_text (t, 6, 1, TAB_CENTER | TAT_TITLE, _("Lower Bound"));
- tab_text (t, 7, 1, TAB_CENTER | TAT_TITLE, _("Upper Bound"));
+ for (int i = 0; i < pvw->n_groups; i++)
+ {
+ const struct ccase *gcc = categoricals_get_case_by_category (cat, i);
+ for (int j = 0; j < 2; j++)
+ pivot_category_create_leaf (
+ j ? j_family->root : i_family->root,
+ pivot_value_new_var_value (cmd->indep_var,
+ case_data (gcc, cmd->indep_var)));
+ }