90f102e3-0b7c-4e94-9a5c-74b0ca356115 6 4 5 false false 0 decimal

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

https://en.smath.com/forum/yaf_postst17703findunread_choose-minimum-positive-number.aspx

A 13 - 421 - 15 mat :

First approach:vectorize the condition.

Elements bigers than one

Z A 1 > vectorize transpose : 0011051 mat

Augment with the 1..n range

B Z 1 A length range augment eval : 010213140552 mat

Find the values where first column is true (one) and take the indices:

C B 11 findrows 2 col (: 3421 mat

Take the minumun of the matrix values

A C el min 2

All in one:

A A 1 > vectorize transpose 1 A length range augment eval 11 findrows 2 col el min 2

Another approach: use an auxiliary function.

Find(M,c(x)) returns a vector with the indices of the elements in M that verify the condition c(x) for x in M, 
or zero if there aren't any one. M 1 c Find n 0 : r 0 : v 0 : 13 mat x M n n 1 + : x c 1 ≡ 0 try v r r 1 + : el n : continue if 21 line for v 31 line :

Condition

x c x 1 > :

Indices

v A x c Find : 3421 mat

Elements

A v el 4221 mat

Minimum

A v el min 2

All in one:

A A x c Find el min 2

Alvaro