我不確定數據格式最合適的名稱是什麼，但我將其稱為“多個框”。 在這種格式中，每個板的讀數輸出到網格中。或帶有行和列標籤的框以及讀取的數字。每個框由一個空行分隔。
還假設原始數據從A：1開始，即在表的第一列中表的第一行的Excel中。
數據格式化目標是將此格式轉換為最小列數，其中每列有一個變量，每行一個觀察。
要使用附加的腳本，請轉到Excel，然後選擇整個頁面並進行複制（編輯，複製）。然後進入JMP並運行腳本。
該腳本有一些有趣的部分，比如它將數據表保存到剪貼板中。
所有其餘部分只是基本的格式和邏輯，以使數據成為有用的形狀。
rev 2注意：腳本的第二版更好用
Names Default To Here( 1 );
dt = New Table( "raw data" );
dt << Bring Window To Front;
Main Menu( "paste" );
dt1 = Current Data Table() << Stack(
columns(
:Column 2,
:Column 3,
:Column 4,
:Column 5,
:Column 6,
:Column 7,
:Column 8,
:Column 9,
:Column 10,
:Column 11,
:Column 12,
:Column 13
),
Source Label Column( "Label" ),
Stacked Data Column( "Data" )
);
dt1 = Current Data Table();
dt1 << New Column( "temp1", formula( If( Length( :Column 1, ) > 1, :Column 1, Lag( :temp1, 1 ) ) ) );
dt1 << New Column( "temp2", formula( If( :Column 1 != Lag( :Column 1, 1 ), 1, Lag( :temp2, 1 ) + 1 ) ) );
dt1 << New Column( "temp3", formula( If( :Column 1 == "" | Contains( :Column 1, ":" ) > 0, 1, 0 ) ) );
dt1 << New Column( "Well ID", formula( :Column 1 || Char( :temp2 ) ) );
dt1 << run formulas();
dt1:temp2 << Delete Formula;
dt1:temp3 << Delete Formula;
dt1:temp1 << set name( "Plate ID" );
:name("Well ID") << Delete Formula;
:name("Plate ID") << Delete Formula;
dt1 << Select Where( is missing (:Data) == 1 | is missing(:Column 1)==1);
dt1 << delete rows;
dt1:Column1 << set name( "Row ID" );
dt1:temp2 << set name( "Column ID" );
:Data<<SET selected=""></SET>
