f

出典: 志村正人 Symposium 2019
論文:ヒルベルトとシェルピンスキーのフラクタル曲線
PDF
Script
ijs
ヒルベルト曲線
JのStudio/Lab/graphics/Viewmat にヒルベルト曲線が入っている
0/1のマトリクスで図形を描くもの
ヒルベルト曲線の手法でシェルピンスキーの生命の木を描く
0/1のマトリクス-1が図形
   1    ( Dadress)}5 5 $0
0 0 1 0 0
0 1 1 1 0
1 1 1 1 1
0 1 1 1 0
0 0 1 0 0
Script(part)
calc_sier4=: 4 : 0
NB. Usage:viewmat -. (125 125 $ 0) calc_sier4 0 62
mat =. x
AD4=. y + (L:0) 0 0; 32 32;64 0; 32 _32  NB. N E S W
for_ctr. i. 4 do.
 mat =. mat calc_sier3 ctr{AD4
end.
Cpos=. ({.AD4) + (L:0) 56 0   NB. 24 0 OK , but why ??
1 (Cadress+ (L:0) Cpos )}mat 
)
viewmat -. (125 125 $ 0) calc_sier4 0 62