원래7수준에서도 정당 정체성과 예상 투표의 연관은 유지된다

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 };
}