nav[aria-label="Primary Navigation"] { padding: 0; & ul { list-style: none; width: 100%; display: flex; flex-direction: row; justify-content: start; align-items: start; gap: 30px; padding: 0; & li { margin: 0; } & ul li { list-style: none; } } }

804118_ja-JP

liliconcom

探索的データ分析に役立つツール

探索的データ分析に役立つツール
ホルガー・スペヒト博士、R&D 主任エンジニア - ams OSRAM グループ

ウィッシュリスト: https://community.jmp.com/t5/JMP-Wish-List/idb-p/jmp-wish-list

#DACH2024

Re: 探索的データ分析に役立つツール

講演で紹介されたアドイン:

クイック選択ツールバー
グラフビルダーツールバー
画像アナライザー(by @JohnPonte ) に「フラッド」ボタンを追加 *)

*) フラッドスクリプト:

flood = Function({},

Try(:"neighbors_dir+diag"n<< get name(), Caption("can you tell me the direct and diagonal neighbors ?!?"); stop());
dt = current data table();
nr = n rows(dt = dt);

Try(:wall; dt << delete column(:wall));
new column("wall", Nominal, set each value(1));
:wall[1]=2;

dt << Graph Builder(
	Show Control Panel( 0 ),
	Variables( X( :X ), Y( :Y ), Color( :wall ) ),
	Elements( Points( X, Y, Legend( 4 ) ) )
);

wait(1);

dt << begin data update();
<BR /><BR />// mark additional pixels as wall "2" if the neighboring pixel belongs to wall 2 - swipe from top to bottom, then inverse  - and so on ...
for( i = 1, i<16, i++ ,
dt << begin data update();
for each ({rw}, 1::nr,
if(rw>1,
:wall[rw] = max(:wall[:"neighbors_dir+diag"n[rw]])));

for each ({rw}, reverse(1::nr),
if(rw>1,
:wall[rw] = max(:wall[:"neighbors_dir+diag"n[rw]])));
dt << end data update();

wait(0.1);

);

)

Flood = Function({}, Try(:"neighbors_dir+diag"n<< get name(), Caption("直接隣接ピクセルと対角隣接ピクセルを教えてください。"); stop()); dt = current data table(); nr = n rows(dt = dt); Try(:wall; dt << delete column(:wall)); new column("wall", Nominal, set each value(1)); :wall[1]=2; dt << Graph Builder( Show Control Panel( 0 ), Variables( X( :X ), Y( :Y ), Color( :wall ) ), Elements( Points( X, Y, Legend( 4 ) ) ) ); wait(1); dt << begin data update(); // 隣接ピクセルが壁 2 に属する場合は、追加のピクセルを壁 "2" としてマークします。上から下にスワイプしてから、逆にスワイプします。以下同様に続けます... for( i = 1, i<16, i++ , dt << begin data update(); for each ({rw}, 1::nr, if(rw>1, :wall[rw] = max(:wall[:"neighbors_dir+diag"n[rw]]))); for each ({rw}, river(1::nr), if(rw>1, :wall[rw] = max(:wall[:"neighbors_dir+diag"n[rw]]))); dt << end data update(); wait(0.1); ); )