The association remains visible at the original seven levels

if (v.kind === "chi") {
  a.push(
    T(10, 35, "A  Expected vote within each party group", 30, C.ink, 700),
    T(1000, 35, "B  Deviation from independence", 30, C.ink, 700),
    T(1135, 82, "Clinton", 24, C.muted, 600, "middle"),
    T(1425, 82, "Dole", 24, C.muted, 600, "middle"),
  );
  let rh = v.rows.length > 3 ? 65 : 145,
    top = 105;
  v.rows.forEach((r, i) => {
    let yy = top + i * rh,
      cs = v.cells.filter((c) => c.i === i);
    a.push(
      T(
        10,
        yy + 24,
        v.rows.length > 3
          ? [
              "0 Strong Dem.",
              "1 Weak Dem.",
              "2 Lean Dem.",
              "3 Independent",
              "4 Lean Rep.",
              "5 Weak Rep.",
              "6 Strong Rep.",
            ][+r]
          : r,
        26,
        C.ink,
        600,
      ),
      T(10, yy + 56, "n = " + cs.reduce((n, c) => n + c.obs, 0), 23, C.muted),
    );
    let xx = 230;
    for (const c of cs) {
      let width = c.pct * 6.4,
        col = c.j === 0 ? C.blue : C.teal;
      a.push(
        G(
          [
            R(xx, yy, Math.max(1, width), 46, col),
            ...(width > 112
              ? [
                  T(
                    xx + width / 2,
                    yy + 31,
                    fmt(c.pct, 1) + "%",
                    25,
                    "#FFFFFF",
                    600,
                    "middle",
                  ),
                ]
              : []),
          ],
          c.key,
        ),
      );
      xx += width;
      let cx = 1000 + c.j * 290;
      let strength = Math.min(1, Math.abs(c.residual) / 15),
        fill = c.residual > 0 ? "#DCE9F3" : "#EFF2F4";
      a.push(
        G(
          [
            R(cx, yy, 270, 65, fill),
            T(cx + 10, yy + 27, c.obs + " / E " + fmt(c.expected, 1), 25),
            T(
              cx + 260,
              yy + 54,
              "res " + signed(c.residual, 1),
              23,
              C.muted,
              400,
              "end",
            ),
          ],
          c.key,
        ),
      );
    }
  });
  a.push(
    R(12, 587, 18, 18, C.blue),
    T(40, 605, "Clinton", 25),
    R(180, 587, 18, 18, C.teal),
    T(208, 605, "Dole", 25),
    T(
      450,
      605,
      "χ²(" + v.df + ") = " + fmt(v.stat, 1) + " · " + pv(v.p),
      28,
      C.ink,
      650,
    ),
    G(
      [
        T(
          1000,
          605,
          "V " +
            fmt(v.effect, 3) +
            "  [" +
            v.effectCI.map((x) => fmt(x, 3)).join(", ") +
            "]",
          30,
          C.ink,
          700,
        ),
      ],
      v.key,
    ),
  );
  note =
    "Counts are observed. E = expected counts. Residual color is descriptive; no cellwise significance claim.";
  source =
    'flowchart LR\n P["Party identification"] --- V["Expected vote"]\n P --> C["Observed × expected counts"]\n V --> C\n C --> R["Residuals + Cramer V"]';
  map = { P: v.key, V: v.cells[0].key, C: v.cells[1].key, R: v.key };
}