## 15 Reputation

11 years, 314 days

## map a piecewise function and eval...

Maple

#hi guys i have a new challenge. and i need your help again, my problem is to map a  piecewise function and #evaluate  with a matriz. thus

A := LinearAlgebra:-RandomMatrix(2, 3);
B := piecewise(a+b < x, a.x+b^2, a+b < x and x < a^2+b, x^2.b+a.x);

A := convert(A, listlist):

#this is my last try to do that.

LL := map(((proc (a, b) ->( a+b < x, (a.x+b^2)/(a+b), a+b < x and x < a^2+b, x^2.b+a)@op), %):

#i...

## re-arrange indice in a new matrix...

Maple

i try to organize the matrix by indice , i.e

B := Vector[row]([1, 4, 13]);
ind:=indices(B);

A := Matrix(3, 3, [1, 3, 4, 2, 4, 1, 2, 3, 2]);
#i try to do that

A:=B(ind,..); # and didn´t work

#this is what i wont,

A := [1, 1], [1, 2], [1, 3], [3, 1], [3, 2], [3, 3], [2, 1], [2, 2], [2, 3]

help

## how can i eval a function wiith a matrix...

i would like to nknow how can i eval a function wiith a matrix?

`> restart; with(ArrayTools); with(LinearAlgebra); with(MTM);`
` varhi := 10; `
`varlo := 0; `
`npar := 2; `
`popsize := 9; `
`par := (varhi-varlo)*RandomArray((proc (A) local i; `
`if A::(rtable[column]) then `
`seq(A(i), i = 1 .. NumElems(A)) else`
` args; `
`end if `
 1 2 Page 2 of 2
﻿