ad8486e4-dec3-4920-918b-934fc941f049 13 15 12 decimal

&[DATE] &[TIME] - &[FILENAME]

Subdivide a range in 'n' intervals ... demo n pivot interval j 1 n 1 + (range h j el pivot - pivot j * + n / : for h 21 line :

'n' subintervals
'm' metric canvas n 5 : m 2 : 21 sys

S m n n interval (* : negS 1 - (S S rows 2 range 11 range el * : New negS S stack : 31 sys

θ rot θ cos θ sin - θ sin θ cos 22 mat :

idx 1 New rows range : A 0 idx * m n * (- New augment : 21 sys

plot A A π - 2 / rot * A - A π - 2 / rot * - stack :

2mn star ... mn square

fence plot1 plot : plot075 0.75 plot * : plot05 0.5 plot * : plot025 0.25 plot * : 41 sys :

i 1 A rows range Fx 2 i * 1 - el A 1 col i el : Fy 2 i * 1 - el A 2 col i el : 21 line for radial Fx Fy augment : 21 line

field fence radial radial - radial π - 2 / rot * radial π - 2 / rot * - 51 sys :

x y axes x y / - :

field 1 1 sys

data list ListCollect collects index list ct 1 : i list rc ct el data i row : ct ct 1 + : 21 line for Un rc 1 el : j 2 rc rows range Un Un rc j el stack : for Un 61 line :

data plot1 :

list 51 data rows Random.N :

list 401427371151 mat

rnd data list ListCollect :

rnd 210610 - 1024 - 1010 - 1052 mat

field axes rnd 3 1 sys

Srip(data) on 2 if/else conditons ... NUMERIC XY Strip XY XY 1 csort : u XY 1 col : v XY 2 col : k 0 : i 2 XY rows (range u i el u i 1 - el ≥ (v i el v i 1 - el - 0 ≠ (& R k k 1 + : el u i el v i el 12 mat : u i el u i 1 - el ≥ (v i el v i 1 - el - 0 ≡ (& R k k 1 + : el u i el v i el 12 mat : end of strip collect/Unest 21 line if if 11 line for j 2 R rows range new j 1 - el R j el : for Unest new 1 el : j 2 new rows range Unest Unest new j el stack : for Unest 91 line :

XY 402510 6.25 10 6.25 40 12.5 30010 6.25 30 43.75 72 mat :

XY Strip 10 6.25 30030 43.75 40 12.5 402552 mat

2) The way the rods must be placed, is from perimeter to the center of the mesh (not in a random way). So, the first 4 rods should be places in the 4 vertices of the mesh. The fifth rod must be in middle of a side (any one). The sixth, in the middle of other side, and so on until complete all the perimeter crosses (or Tees). After that, the rods must be drawn in the inner rectangel (counting from the perimeter to the center of the mes), and in the same way as before, the rods will be completing this internal perimeter.

A A π - 2 / rot * A - A π - 2 / rot * - 14 mat 10 - 10 - 10 - 8 - 10 - 6 - 10 - 4 - 10 - 2 - 10 - 010 - 210 - 410 - 610 - 810 - 10112 mat 1010 - 810 - 610 - 410 - 210 - 010 - 2 - 10 - 4 - 10 - 6 - 10 - 8 - 10 - 10 - 10 - 112 mat 1010108106104102100102 - 104 - 106 - 108 - 1010 - 112 mat 10 - 108 - 106 - 104 - 102 - 100102104106108101010112 mat 14 mat

Sequencial construction

Ω 10 - 10 - 1010 - 101010 - 1042 mat :

i 1 Ω rows range Ωx 2 i * 1 - el Ω 1 col i el : Ωy 2 i * 1 - el Ω 2 col i el : 21 line for radial Ωx Ωy augment : 21 line

Ωc 10 - 0010 - 10001042 mat :

i 1 Ωc rows range Ωcx 2 i * 1 - el Ωc 1 col i el : Ωcy 2 i * 1 - el Ωc 2 col i el : 21 line for radial_center Ωcx Ωcy augment : 21 line

Ω radial Ωc radial_center 4 1 sys

Sequencial construction will result to an identical canvas as in front proposal for 'n = even'. Rectangular sequence is similar from different data.