14รื้อสไลด์จริงมาประกอบใหม่

"""รื้อสไลด์แล้วประกอบใหม่ — ตัวเลขทุกตัวของบทนี้มาจากสคริปต์เดียวนี้"""
import math

DATA = [("ก", 22), ("ข", 18), ("ค", 25), ("ง", 16), ("จ", 19)]
K = 0.05
vals = [v for _, v in DATA]
hi, total = max(vals), sum(vals)
rank = sorted(DATA, key=lambda kv: -kv[1])

# --- 1. บัญชีหมึกสามช่อง — ต่อยอดจาก dataink.py ในบทที่ 7 ที่มีแค่สองช่อง ---
#     บริบท = หน่วย ที่มา เส้นอ้างอิง ซึ่งบทที่ 7.3 ห้ามลบ · เปล่า = ไม่ตอบคำถามไหนเลย
BEFORE_INK = [
    ("ชิ้นวงกลม 5 ชิ้น", 5, "ข้อมูล"),
    ("คำอธิบายสัญลักษณ์ 5 บรรทัด", 5, "เปล่า"),
    ("วงแหวนเงาใต้วงกลม", 1, "เปล่า"),
    ("กรอบรอบภาพ 4 ด้าน", 4, "เปล่า"),
    ("เส้นคั่นใต้หัวข้อ", 1, "เปล่า"),
    ("หัวข้อที่บอกแค่ชื่อเรื่อง", 1, "บริบท"),
    ("บรรทัดหน่วยและที่มา", 1, "บริบท"),
]
AFTER_INK = [
    ("แท่ง 5 อัน", 5, "ข้อมูล"),
    ("ตัวเลขบนแท่ง", 5, "ข้อมูล"),
    ("ป้ายชื่อใต้แท่ง", 5, "ข้อมูล"),
    ("หัวข้อที่บอกข้อสรุป", 1, "ข้อมูล"),
    ("เส้นฐานเส้นเดียว", 1, "บริบท"),
    ("บรรทัดหน่วยและที่มา", 1, "บริบท"),
]


def ink(name, items):
    kinds = {"ข้อมูล": 0, "บริบท": 0, "เปล่า": 0}
    for _, n, kind in items:
        kinds[kind] += n
    t = sum(kinds.values())
    print(f"=== บัญชีหมึกของ{name} ===")
    for label, n, kind in items:
        print(f"  [{kind}] {label} = {n}")
    print(f"  รวม {t} ชิ้น · ข้อมูล {kinds['ข้อมูล']} · บริบท {kinds['บริบท']} "
          f"· เปล่า {kinds['เปล่า']} · หมึกที่เป็นข้อมูล {kinds['ข้อมูล'] / t * 100:.1f}%\n")
    return kinds, t


b_kind, b_total = ink("สไลด์ตั้งต้น", BEFORE_INK)
a_kind, a_total = ink("สไลด์ที่ประกอบใหม่", AFTER_INK)
print(f"จำนวนชิ้นรวม {b_total} -> {a_total} · หมึกเปล่า {b_kind['เปล่า']} -> {a_kind['เปล่า']}"
      f" · หมึกที่เป็นข้อมูล {b_kind['ข้อมูล']} -> {a_kind['ข้อมูล']}")
print("ที่ว่างที่ได้จากการลบ ไม่ได้กลายเป็นที่ว่าง มันถูกเอาไปใส่ข้อมูลจนเต็ม\n")


# --- 2. งานโหมดไล่ทีละชิ้นที่สไลด์โยนไปให้คนอ่าน (บทที่ 2) ---
def serial_jobs(n, legend, sorted_by_value, values_printed):
    jobs = []
    if legend:
        jobs.append(("จับคู่ชิ้นกับคำอธิบายสัญลักษณ์", n))
    if not sorted_by_value:
        jobs.append(("ไล่เทียบเองเพื่อหาอันดับ", n - 1))
    if not values_printed:
        jobs.append(("กะค่าจากภาพทีละชิ้น", n))
    return jobs


print("=== งานโหมดไล่ทีละชิ้นที่คนอ่านต้องทำ ===")
for name, kw in (("สไลด์ตั้งต้น", dict(legend=True, sorted_by_value=False, values_printed=False)),
                 ("สไลด์ที่ประกอบใหม่", dict(legend=False, sorted_by_value=True, values_printed=True))):
    jobs = serial_jobs(len(DATA), **kw)
    print(f"  {name}: {sum(c for _, c in jobs)} ครั้ง")
    for label, c in jobs:
        print(f"    {label} {c} ครั้ง")
    if not jobs:
        print("    ไม่มีเลย ทุกอย่างอ่านได้ในโหมดขนาน")
print()

# --- 2ก. สีทำหน้าที่อะไร และคนอ่านต้องจำอะไรบ้าง (บทที่ 2, 8) ---
print("=== หน้าที่ของสี ===")
for name, hues, job, must_remember in (
        ("สไลด์ตั้งต้น", 5, "แยกตัวตนของกลุ่ม", 5),
        ("สไลด์ที่ประกอบใหม่", 1, "เน้นข้อสรุปหนึ่งจุด", 0)):
    print(f"  {name}: ใช้ {hues} สี · สีทำหน้าที่{job} "
          f"· คนอ่านต้องจำคู่สี-ชื่อ {must_remember} คู่")
print("  ทั้งสองใบไม่ได้เอาสีไปแบกปริมาณ ข้อผิดพลาดของบทที่ 8 จึงไม่ได้อยู่ที่สไลด์นี้")
print("  สิ่งที่สีทำผิดในใบตั้งต้นคือทำหน้าที่ของป้าย ทั้งที่ป้ายวางติดชิ้นได้เลย\n")


# --- 3. ช่องทางไหนแบกช่องว่างไหนไหว (สูตรจาก channels.py บทที่ 5) ---
def share_of_range(gap, channel):
    return gap / hi if channel == "ความยาว" else gap / total


steps = [(rank[i], rank[i + 1]) for i in range(len(rank) - 1)]
tight = min(steps, key=lambda p: p[0][1] - p[1][1])
FACTS = [(f"อันดับ {i + 1} กับ {i + 2}", a, b) for i, (a, b) in enumerate(steps)]
FACTS.append(("หัวตารางกับท้ายตาราง", rank[0], rank[-1]))

print("=== ย้ายช่องทางจากมุมไปความยาว แล้วช่องว่างได้ส่วนแบ่งเท่าไหร่ ===")
homeless = {"มุม": [], "ความยาว": []}
for label, a, b in FACTS:
    gap = a[1] - b[1]
    cells = []
    for ch in ("มุม", "ความยาว"):
        s = share_of_range(gap, ch)
        if s < K:
            homeless[ch].append((a[0], b[0], gap))
        cells.append(f"{ch} {s * 100:5.2f}% {'ผ่าน' if s >= K else 'ไม่ผ่าน'}")
    print(f"  {label} ({gap} จุด): " + " | ".join(cells))
print(f"  ข้อที่ภาพแบกไม่ไหว: วงกลม {len(homeless['มุม'])} ข้อ · แท่ง {len(homeless['ความยาว'])} ข้อ\n")


# --- 4. ถ้าตัดฐานแกนของแท่ง จะเกิดอะไร (สูตรจาก liefactor.py บทที่ 9) ---
def lie_factor(a, b, floor):
    real = abs(a - b) / min(a, b)
    ha, hb = a - floor, b - floor
    shown = abs(ha - hb) / min(ha, hb)
    return real, shown, shown / real


A, B = tight[0][1], tight[1][1]
print(f"=== คู่ที่สูสีที่สุด ({A} กับ {B}) ถ้าตัดฐานแกนออก ===")
for floor in (0, 10, 15, 17):
    real, shown, lf = lie_factor(A, B, floor)
    print(f"  ฐานแกน {floor:>3} -> ผลจริง {real * 100:6.2f}% "
          f"-> ภาพแสดง {shown * 100:6.2f}% -> ตัวคูณคำโกหก {lf:.2f}")
print("  ศูนย์คือฐานเดียวที่ตัวคูณเท่ากับ 1 และแท่งอ่านค่าจากความยาว จึงไม่มีทางเลือกอื่น\n")


# --- 5. หัวข้อที่ประกอบจากข้อเท็จจริงที่แท่งแบกไม่ไหว (วิธีจาก headline.py บทที่ 13) ---
HEADLINE = " · ".join(
    [f"หน่วย {rank[0][0]} ใช้มากที่สุด {rank[0][1]} จาก {total}"]
    + [f"{a} กับ {b} ต่างกัน {gap} จุด" for a, b, gap in homeless["ความยาว"]]
)
print("=== หัวข้อของสไลด์ที่ประกอบใหม่ ===")
print(f"  {HEADLINE}")
print(f"  แบกข้อเท็จจริง {1 + len(homeless['ความยาว'])} ข้อ · ยาว {len(HEADLINE)} ตัวอักษร\n")


# --- 6. เรขาคณิตของภาพทั้งสามในบทนี้ ---
print("=== เรขาคณิตของ FIG 14.1 (วงกลม รัศมี 72 เรียงตามลำดับในตาราง) ===")
start, R = -90.0, 72.0
for k, v in DATA:
    sweep = v / total * 360.0
    end = start + sweep
    x1, y1 = R * math.cos(math.radians(start)), R * math.sin(math.radians(start))
    x2, y2 = R * math.cos(math.radians(end)), R * math.sin(math.radians(end))
    print(f"  {k}: {v:>3} -> {sweep:6.2f} องศา | "
          f"M 0 0 L {x1:7.2f} {y1:7.2f} A {R} {R} 0 0 1 {x2:7.2f} {y2:7.2f} Z")
    start = end

print("\n=== เรขาคณิตของ FIG 14.2 (แท่งเรียงจากมาก ฐานที่ศูนย์ สูงสุด 110 px) ===")
BAR_MAX = 110.0
for k, v in rank:
    print(f"  {k}: {v:>3} -> สูง {v / hi * BAR_MAX:6.2f} px")

print("\n=== เรขาคณิตของ FIG 14.3 (จุดบนแกนร่วม ซูมช่วง 16-25 กว้าง 480 px) ===")
lo_v, hi_v, AXIS = min(vals), hi, 480.0
for k, v in rank:
    print(f"  {k}: {v:>3} -> x {(v - lo_v) / (hi_v - lo_v) * AXIS:6.2f} px")
gap_tight = A - B
print(f"  ช่องว่าง {gap_tight} จุด บนแกนที่ซูมแล้ว = "
      f"{gap_tight / (hi_v - lo_v) * 100:.2f}% ของช่วงที่วาด "
      f"(บนแท่งฐานศูนย์ได้ {share_of_range(gap_tight, 'ความยาว') * 100:.2f}%)")

=== บัญชีหมึกของสไลด์ตั้งต้น ===
  [ข้อมูล] ชิ้นวงกลม 5 ชิ้น = 5
  [เปล่า] คำอธิบายสัญลักษณ์ 5 บรรทัด = 5
  [เปล่า] วงแหวนเงาใต้วงกลม = 1
  [เปล่า] กรอบรอบภาพ 4 ด้าน = 4
  [เปล่า] เส้นคั่นใต้หัวข้อ = 1
  [บริบท] หัวข้อที่บอกแค่ชื่อเรื่อง = 1
  [บริบท] บรรทัดหน่วยและที่มา = 1
  รวม 18 ชิ้น · ข้อมูล 5 · บริบท 2 · เปล่า 11 · หมึกที่เป็นข้อมูล 27.8%

=== บัญชีหมึกของสไลด์ที่ประกอบใหม่ ===
  [ข้อมูล] แท่ง 5 อัน = 5
  [ข้อมูล] ตัวเลขบนแท่ง = 5
  [ข้อมูล] ป้ายชื่อใต้แท่ง = 5
  [ข้อมูล] หัวข้อที่บอกข้อสรุป = 1
  [บริบท] เส้นฐานเส้นเดียว = 1
  [บริบท] บรรทัดหน่วยและที่มา = 1
  รวม 18 ชิ้น · ข้อมูล 16 · บริบท 2 · เปล่า 0 · หมึกที่เป็นข้อมูล 88.9%

จำนวนชิ้นรวม 18 -> 18 · หมึกเปล่า 11 -> 0 · หมึกที่เป็นข้อมูล 5 -> 16
ที่ว่างที่ได้จากการลบ ไม่ได้กลายเป็นที่ว่าง มันถูกเอาไปใส่ข้อมูลจนเต็ม

=== งานโหมดไล่ทีละชิ้นที่คนอ่านต้องทำ ===
  สไลด์ตั้งต้น: 14 ครั้ง
    จับคู่ชิ้นกับคำอธิบายสัญลักษณ์ 5 ครั้ง
    ไล่เทียบเองเพื่อหาอันดับ 4 ครั้ง
    กะค่าจากภาพทีละชิ้น 5 ครั้ง
  สไลด์ที่ประกอบใหม่: 0 ครั้ง
    ไม่มีเลย ทุกอย่างอ่านได้ในโหมดขนาน

=== หน้าที่ของสี ===
  สไลด์ตั้งต้น: ใช้ 5 สี · สีทำหน้าที่แยกตัวตนของกลุ่ม · คนอ่านต้องจำคู่สี-ชื่อ 5 คู่
  สไลด์ที่ประกอบใหม่: ใช้ 1 สี · สีทำหน้าที่เน้นข้อสรุปหนึ่งจุด · คนอ่านต้องจำคู่สี-ชื่อ 0 คู่
  ทั้งสองใบไม่ได้เอาสีไปแบกปริมาณ ข้อผิดพลาดของบทที่ 8 จึงไม่ได้อยู่ที่สไลด์นี้
  สิ่งที่สีทำผิดในใบตั้งต้นคือทำหน้าที่ของป้าย ทั้งที่ป้ายวางติดชิ้นได้เลย

=== ย้ายช่องทางจากมุมไปความยาว แล้วช่องว่างได้ส่วนแบ่งเท่าไหร่ ===
  อันดับ 1 กับ 2 (3 จุด): มุม  3.00% ไม่ผ่าน | ความยาว 12.00% ผ่าน
  อันดับ 2 กับ 3 (3 จุด): มุม  3.00% ไม่ผ่าน | ความยาว 12.00% ผ่าน
  อันดับ 3 กับ 4 (1 จุด): มุม  1.00% ไม่ผ่าน | ความยาว  4.00% ไม่ผ่าน
  อันดับ 4 กับ 5 (2 จุด): มุม  2.00% ไม่ผ่าน | ความยาว  8.00% ผ่าน
  หัวตารางกับท้ายตาราง (9 จุด): มุม  9.00% ผ่าน | ความยาว 36.00% ผ่าน
  ข้อที่ภาพแบกไม่ไหว: วงกลม 4 ข้อ · แท่ง 1 ข้อ

=== คู่ที่สูสีที่สุด (19 กับ 18) ถ้าตัดฐานแกนออก ===
  ฐานแกน   0 -> ผลจริง   5.56% -> ภาพแสดง   5.56% -> ตัวคูณคำโกหก 1.00
  ฐานแกน  10 -> ผลจริง   5.56% -> ภาพแสดง  12.50% -> ตัวคูณคำโกหก 2.25
  ฐานแกน  15 -> ผลจริง   5.56% -> ภาพแสดง  33.33% -> ตัวคูณคำโกหก 6.00
  ฐานแกน  17 -> ผลจริง   5.56% -> ภาพแสดง 100.00% -> ตัวคูณคำโกหก 18.00
  ศูนย์คือฐานเดียวที่ตัวคูณเท่ากับ 1 และแท่งอ่านค่าจากความยาว จึงไม่มีทางเลือกอื่น

=== หัวข้อของสไลด์ที่ประกอบใหม่ ===
  หน่วย ค ใช้มากที่สุด 25 จาก 100 · จ กับ ข ต่างกัน 1 จุด
  แบกข้อเท็จจริง 2 ข้อ · ยาว 55 ตัวอักษร

=== เรขาคณิตของ FIG 14.1 (วงกลม รัศมี 72 เรียงตามลำดับในตาราง) ===
  ก:  22 ->  79.20 องศา | M 0 0 L    0.00  -72.00 A 72.0 72.0 0 0 1   70.72  -13.49 Z
  ข:  18 ->  64.80 องศา | M 0 0 L   70.72  -13.49 A 72.0 72.0 0 0 1   42.32   58.25 Z
  ค:  25 ->  90.00 องศา | M 0 0 L   42.32   58.25 A 72.0 72.0 0 0 1  -58.25   42.32 Z
  ง:  16 ->  57.60 องศา | M 0 0 L  -58.25   42.32 A 72.0 72.0 0 0 1  -66.94  -26.50 Z
  จ:  19 ->  68.40 องศา | M 0 0 L  -66.94  -26.50 A 72.0 72.0 0 0 1   -0.00  -72.00 Z

=== เรขาคณิตของ FIG 14.2 (แท่งเรียงจากมาก ฐานที่ศูนย์ สูงสุด 110 px) ===
  ค:  25 -> สูง 110.00 px
  ก:  22 -> สูง  96.80 px
  จ:  19 -> สูง  83.60 px
  ข:  18 -> สูง  79.20 px
  ง:  16 -> สูง  70.40 px

=== เรขาคณิตของ FIG 14.3 (จุดบนแกนร่วม ซูมช่วง 16-25 กว้าง 480 px) ===
  ค:  25 -> x 480.00 px
  ก:  22 -> x 320.00 px
  จ:  19 -> x 160.00 px
  ข:  18 -> x 106.67 px
  ง:  16 -> x   0.00 px
  ช่องว่าง 1 จุด บนแกนที่ซูมแล้ว = 11.11% ของช่วงที่วาด (บนแท่งฐานศูนย์ได้ 4.00%)