親愛的 JMP 社區
我正在並排準備基因表達變化的熱圖,每個熱圖都有兩個 y 軸(基因本體和功能)。
現在我正在製作單獨的圖表並在PowerPoint中將它們拼湊在一起。 見圖片:

為了標準化圖例和所有其他屬性,將它們製作在一個圖形窗口中會很棒
然而,這對我來說不起作用(見圖)。 本質上,我想為非冗餘數據製作多個 Y 軸。
帶有兩個標籤和“by”功能的單元格圖可以正常工作,但圖例不容易修改,所以我沒有使用該選項
最好的,
這樣的輸出對你有幫助嗎?

附上我用來生成這個圖表的示例數據表,下面是腳本
names default to here(1);
dt=current data table();
// Add Blank Columns
dt << Add Multiple Columns( "color", 3, after(:gene ontology),Character);
// Change data table original names
dt:Biological << set name("Biological Value");
dt:Color 1 << set name("Biological");
dt:Cellular << set name("Cellular Value");
dt:Color 2 << set name("Cellular");
dt:Molecular << set name("Molecular Value");
dt:Color 3 << set name("Molecular");
// Stack the values
dtStack = dt << Stack(
columns( :Biological Value, :Cellular Value, :Molecular Value ),
Source Label Column( "Label" ),
Stacked Data Column( "Data" ),
Name( "Non-stacked columns" )(Keep( :Gene Ontology ))
);
// Delete missing value cells
dtStack << select where(ismissing(:data));
dtStack << delete rows;
dtStack:Data << set name("% of transcript");
// set the colors
dtStack << Color by Column( :Name("% of transcript"), Make window with legend(1));
current data table(dtStack);
For(i=1,i<=N Rows(dtStack),i++,
theRow = dt << get rows where(dtStack:Gene Ontology[i] == :gene ontology);
If(dtStack:Label[i] == "Molecular Value",
dt:Molecular << color cells(color of(rowstate(i)),theRow[1]),
dtStack:Label[i] == "Biological Value",
dt:Biological << color cells(color of(rowstate(i)),theRow[1]),
dtStack:Label[i] == "Cellular Value",
dt:Cellular << color cells(color of(rowstate(i)),theRow[1]),
)
);
close( dtStack, nosave );
// Get rid on unwanted columns
dt << delete columns({"Biological Value","Cellular Value","Molecular Value"});
// Perform some crazy manuvers to get the data table and graph as a static
// image in the final display
nw2=new window("temp",<<JOURNAL></JOURNAL>