JMP OLE：如何將圖例添加到雙變量<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />我無法弄清楚如何通過OLE在我的雙變量圖表中顯示圖例。JSL OLE中的文檔很少（我是唯一一個這樣做的人嗎？）。有人能指出我正確的方向嗎？在它的當前狀態下，它將按列顯示圖形和顏色代碼。我需要做的只是顯示圖例。
這是我的代碼（VBscript）：
'初始化JMP
Dim MyJMP，JMPDoc，DT，DT2，WidthTable，FrameBox
設置MyJMP = CreateObject（“JMP.Application”）
MyJMP.Visible = true
設置JMPDoc = MyJMP.OpenDocument（“MyFile.csv”）
'將文檔轉換為數據表
設置DT = JMPDoc.GetDataTable
'選擇寬度數據（高和低）
DT.SelectRowsWhere“CHART_SUBSET”，rowSelectEquals，rowSelectExtendCurrent，“TARGET = HIGH”
DT.SelectRowsWhere“CHART_SUBSET”，rowSelectEquals，rowSelectExtendCurrent，“TARGET = LOW”
設置WidthTable = DT.subset
WidthTable.ColorByColumn（“SPC_ENTITY”）
WidthTable.MarkerByColumn（“SPC_ENTITY”）
“********
'創建雙變量圖表
“********
昏暗的Biv
設置Biv = WidthTable.Document.CreateBivariate
Biv.LaunchAddY（“SPC_CHART_VALUE”）
Biv.LaunchAddX（“SPC_TXN_DATE”）
Biv.LaunchAddBy（“SPC_CHART_SUBSET”）
Biv.FitLine
Biv.Launch
FrameBox = Biv.GetGraphicItemByType（“框架框”，1）
Biv.FrameBoxAddGraphicsScript 1，“行圖例（：SPC_ENTITY）”
Biv.FrameBoxSetMarkerSize 1,4
JMP OLE：如何將圖例添加到雙變量嗨Maltman：
全能的RunCommand（）函數可以讓你輕鬆地在JMP中直接進行交互式對話，... 然後，如果你捕獲腳本，很容易從自動化方面，從VBA，或Perl，Python或R等提交...
最好，
-Matt
公共子測試（）
'初始化JMP
Dim MyJMP，JMPDoc，DT，DT2，WidthTable，FrameBox
設置MyJMP = CreateObject（“JMP.Application”）
MyJMP.Visible = True
設置JMPDoc = MyJMP.OpenDocument（“C：/ temp / Big Class.jmp”）
'將文檔轉換為數據表
設置DT = JMPDoc.GetDataTable（）
'選擇寬度數據（高和低）
DT.SelectRowsWhere“age”，rowSelectEquals，rowSelectExtendCurrent，“12”
DT.SelectRowsWhere“age”，rowSelectEquals，rowSelectExtendCurrent，“13”
設置WidthTable = DT.Subset（）
WidthTable.ColorByColumn（“name”）
WidthTable.MarkerByColumn（“sex”）
“********
'創建雙變量圖表
“********
Dim str As String
str =“Bivariate（”_
＆“Y（：重量），”_
＆“X（：height），”_
＆“Fit Line（{Line Color（{213,72,87}）}），”_
＆“SendToReport（”_
＆“派遣（”_
＆“{}，”_
＆“”“Bivar Plot”“，”_
＆“FrameBox，”_
＆“{標記大小（4），行傳奇（”_
＆“名稱，顏色（1），顏色主題（”“JMP默認”“），”_
＆“Marker（0），”_
＆“標記主題（”“”“），”_
＆“連續刻度（0），”_
＆“反向比例（0），”_
＆“排除的行（0）”_
＆“）}”_
＆“）”_
＆“）”_
＆“）;”
Debug.Print（str）
MyJMP.RunCommand（str）
結束子
JMP OLE：如何將圖例添加到雙變量如果有人能提供一些見解，仍然在尋找一些幫助。
我試過這樣的東西，但它不起作用：
Biv.LaunchAddJSL“行傳奇（：SPC_ENTITY，color（1），Marker（1））;”
謝謝
