如何將多個打開的 .jmp 數據表保存為 .csv 文件?<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />由於表子集,我有多個 .jmp 數據表需要保存為 .csv 文件。 我嘗試了一個腳本來保存所有打開的表,但我只能讓它保存為 .jmp 文件。
openDTs=List();For (i=1, i<=N Table(), i++, Insert Into (openDTs, Data Table (i)););
對於(i=1,i<=N 項(openDTs),i++,openDTS <<保存(););
從子集操作開始,我將打開大量表,因此最好避免打開那麼多表,並嘗試在子集操作後合併保存過程。 我對編寫腳本非常陌生,非常感謝任何想法。
回复:如何將多個打開的 .jmp 數據表保存為 .csv 文件?非常感謝。 那個劇本正是我要找的!
回复:如何將多個打開的 .jmp 數據表保存為 .csv 文件?整潔的。 如果您想從每個數據表中不分青紅皂白地捕獲所有數據,PMroz 的腳本非常適合。 我提供的腳本為您提供了更多控制,因為您可以選擇寫出哪些列;如果需要,還可以調整它以選擇特定行甚至特定單元格。 如果您需要那種級別的控制,您應該能夠將腳本中的代碼插入到 PMroz 的腳本中以選擇多個數據表。
回复:如何將多個打開的 .jmp 數據表保存為 .csv 文件?dt1 =打開( “$sample_data\Big Class.jmp” ) ;
dt2 =打開( “$sample_data\Bands Data.jmp” ) ;
dt3 =打開( "$sample_data\Auto Raw Data.jmp" ) ;
dt4 =打開( “$sample_data\Fitness.jmp” ) ;
OpenDTs = {} ;
為了(我= 1個,我<= N 表() ,我++,
插入( OpenDTs ,數據表(我) )
) ;
文件目錄= “c:\臨時\” ;
為了(我= 1個,我<= N 項( OpenDTs ) ,我++,
一個名字=打開DTS [我] <<取名;
文件路徑=文件目錄||一個名字|| “.csv” ;
打開DTS [我] <<節省(文件路徑) ;
) ;
回复:如何將多個打開的 .jmp 數據表保存為 .csv 文件?非常感謝腳本。 我嘗試了它並處理了其中一個 .jmp 文件。 現在的問題是我有 400 多個 jmp 表,我需要將它們另存為 .csv 文件,並與原始對應的 jmp 表同名。 我想不出辦法做到這一點。
回复:如何將多個打開的 .jmp 數據表保存為 .csv 文件?如果您提供的路徑具有 .csv 擴展名,它將被保存為 csv 文件。
dt =新表( “CSV 示例” ,添加行( 3個) ,
新建專欄( “第一欄” ,數字,連續的,格式( “最好的” , 12 ) ,設置值( [ 1個, 2個, 3個] ) ) ,
新建專欄( “第 2 欄” ,特點,標稱,設置值( { “A” , “乙” , “C” } ) )
) ;
fp = “c:\temp\csv_example.csv” ;
dt <<節省( fp ) ;
回复:如何將多個打開的 .jmp 數據表保存為 .csv 文件?理想情況下,這將是一個簡單的單行修復,但仔細研究,情況似乎並非如此。 節省和另存為具體保存一個JMP數據表,因為除了路徑/文件名之外,這些函數沒有額外的參數,比如文件類型。 還有一個文件輸出功能,保存文本文件, 但它只將特定字符串輸出到文本文件。 幸運的是,我有豐富的編程經驗,所以完成這個任務的方法經過思考後對我來說相當簡單,因為大多數編程語言都會通過這種方式創建 CSV 文件。
下面是一個腳本,可以完成你想要的,你只需要讓它適應你的數據表;您需要在數據表中指定特定的列。 這個腳本所做的是首先確定數據表中的行數。 然後用一個For循環從數據表中每一行的特定列中抓取數據,寫入到一個文本文件中。 在第一行,創建新文件或覆蓋現有文件。 對於所有剩餘的行,數據將附加到現有文件中。 此外,因此您不會得到一個只有一行連續數據的文件,換行符會添加到文件中除最後一行以外的所有行。
必須以這種方式編寫文本文件的一個優點是,如果您只需要某些數據,您可以選擇要導出的列。 顯然,如果您需要所有數據並且有多個列,那麼這個過程會很乏味,但正如我之前提到的,這種技術在大多數編程語言中都很典型。
名稱默認為此處( 1個) ;
dt =當前數據表() ;
最後一行= N行() ;
為了(我= 1個,我<=最後一行,我++,
//獲取列
地點= :地點[我] ;
天= :天[我] ;
時間= :時間[我] ;
數數= :數數[我] ;
意思是= :意思是[我] ;
最大限度= :最大限度[我] ;
//創建逗號分隔的行
csv行=拼接項目(
{地點,字符(天) ,字符(時間) ,字符(數數) ,字符(意思是) ,字符(最大限度)} ,
","
) ;
//保存行到文本文件
如果(我== 1個,
保存文本文件( “$DESKTOP/測試文件.csv” , csv行,模式( “代替” )) ,
保存文本文件( “$DESKTOP/測試文件.csv” , csv行,模式( “附加” ))
) ;
//導出除最後一行以外的所有行的換行符
如果(我!=最後一行,保存文本文件( “$DESKTOP/測試文件.csv” , "\!n" ,模式( “附加” ))) ;
) ;