※ 引述《buffalobill (水牛比爾)》之銘言:
: ......應該寫個程式去算的
於是我拿了 Mathematica 擺弄了一會
(Mathematica 把平面圖判斷建成函數 PlanarGraphQ 了, 直接叫用就好)
找到使得"所有最大邊≦M 的畢氏數組形成的圖"不為平面圖的最小 M 是 52
在加入 (20,48,52) 時失敗
然後為了要抓出不平面在哪裡又擺弄了更久一會, 終於找到了其中一個同胚 K33 的子圖:
https://i.imgur.com/HMsVPHD.png

上色的是三個點都在圖上的數組:
橘色 (9,12,15), 紅色 (15,20,25), 藍色 (12,16,20), 棕色 (30,40,50)
其他帶數字的邊是兩個點在圖上的數組:
([7],24,25), ([18],24,30), (9,40,[41]), (24,[32],40),
(16,30,[34]), ([14],48,50), (20,48,[52])
以上十一組數組所形成的圖裡有如上所示的 K33 子圖
半邊是 40, 30, 20, 另外半邊是 24, 12, 50
====
把 Mathematica 的計算過程簡單整理了一下匯出來在這裡:
https://drive.google.com/file/d/1-KRWDn1znwIyOF48M2hEgtKukSTLk3nX/view
中間當然還有其他細節東西的計算 (例如第一行改 M 值再丟給 PlanarGraphQ 等)
這裡留下來的是比較不好手做的刪除無關節點的步驟
--
Ace Snake Santa Clover Junpei June Seven Lotus 9th man cabin kitchen casino
shower operating room laboratory T H E chart captain quarter confinement
torture room steam engine room cargo chapel library study incinerator Gigantic
Q director office security N O N A R Y archives control laboratory
pec treatment garden pantry gaulem bay rec room crew quarters infirmary lounge
elevator Tenmyouji Quark Dio G A M E S Luna Phi Sigma Alice Clover K
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 123.194.181.180 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Math/M.1719580805.A.84D.html
推
06/28 21:25,
1年前
, 1F
06/28 21:25, 1F
→
06/28 21:26,
1年前
, 2F
06/28 21:26, 2F
→
06/29 19:52,
1年前
, 3F
06/29 19:52, 3F
→
06/29 19:52,
1年前
, 4F
06/29 19:52, 4F
→
06/29 19:52,
1年前
, 5F
06/29 19:52, 5F
→
06/29 19:53,
1年前
, 6F
06/29 19:53, 6F
※ 編輯: LPH66 (123.194.181.180 臺灣), 06/29/2024 19:53:42
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):