247077_ja-JP

liliconcom

コードの助け

para = {"Age","Orientation","Preference","Salary","Number","SN","Years","Service"} //some of the column names needed 

main_table_col_remain = main_tab << get column names(string);

For( i = N Items( main_table_col_remain ), i > 0, i--,
 If(!Contains( main_table_col_remain[i],<FONT color="#FF0000"> ??</FONT> ) ,
  Remove From( main_table_col_remain, i )
 ));
 

「??」には何を入れますか部？私はしばらくこのコードを回っていました。paraに格納されていない列名を削除したい。

再：コードのヘルプ

後方比較がありました。  main_table_col_remain [1]を取得し、paraリストを調べてそこにあるかどうかを確認し、main_table_co_remainingリストから削除します。

para = {"Age", "Orientation", "Preference", "Salary", "Number", "SN", "Years", "Service"}; //some of the column names needed 

main_table_col_remain = main_tab << get column names( string );

For( i = N Items( main_table_col_remain ), i > 0, i--,
 If( Contains( Para, main_table_col_remain[i] ),
  Remove From( main_table_col_remain, i, 1 )
 )
);

再：コードのヘルプ

質問をフォローアップし、このコードを個別に分割しないように調整するにはどうすればよいですか？ 

for(i=1, i<=n, i++,
 if((contains item(Para[i], main_table_col_remain) == 1),
  param = main_table_col_remain[i];
  tempdt =eval(parse( " combined_tab << Split(
  Split By(:Source_Table),
  Split(:Name(\!"" ||param|| "\!")),
  Remaining Columns(Drop All),
  Sort by Column Property 
  )"
  ))));
  

再：コードのヘルプ

あなたがしたいことを正しく読んでいるなら、あなたがする必要があるのは、すべてを置くことです main_table_col_remain 列を分割定義に同時に追加します。  Big ClassサンプルデータテーブルのSex列で身長と体重の両方を分割する簡単な例を次に示します

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/big class.jmp" );<BR />dt << Split(
 Split By( :sex ),
 Split( :height, :weight ),
 Remaining Columns( Drop All ),
 Sort by Column Property
);

データテーブルに複雑な名前があると、：Name（）を各要素に追加する傾向があります。 main_table_col_remainそしてあなたの場合、リストを文字列に変えます

myString = ":Name( \!"" || char(main_table_col_remain[1]) || "\!" )";
For( I = 2, I<= N Items( main_table_col_remain ), i++,
     myString = myString || ", :Name( \!"" || char(main_table_col_remain[i]) || "\!" )" ;
);

次に、リスト全体を分割に追加できます

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/big class.jmp" );

main_table_col_remain = dt << get column names( string, continuous );

myString = ":Name( \!"" || Char( main_table_col_remain[1] ) || "\!" )";
For( I = 2, I <= N Items( main_table_col_remain ), i++,
 myString = myString || ", :Name( \!"" || Char( main_table_col_remain[i] ) || "\!" )"
);

Eval(
 Parse(
  "
dtSplit = dt << Split(
 Split By( :sex ),
 Split( " || myString ||
  " ),
 Remaining Columns( Drop All ),
 Sort by Column Property
);"
 )
);