@Carl Love thank you

I have modified W as Vector that consist of 1 to n element (not input like previous eqs). W=[W1...Wn] is auto generated by program,the finally equaction is

I use the same code but got error

do you have any methods to calculate W directly? and get the solution as below(for general)

@Carl Love hi sir

In fact your code is correct but the solution I can't extract and evaluate as numerical.

please guide me

Thank you

hello @Carl Love , your code so amazing

back to Flatten: I want to flatten as picture below

I try to flatten but got unwant results,please guide me

----------------------------------Code----------------------------------------

DOe := Matrix(3, 2, [[Vector[column](1, [Vector[row](2, [1, 2])]), Vector[column](1, [Vector[row](2, [3, 4])])], [Vector[column](1, [Vector[row](2, [3, 4])]), Vector[column](1, [Vector[row](2, [5, 6])])], [Vector[column](1, [Vector[row](2, [5, 6])]), Vector[column](1, [Vector[row](2, [1, 2])])]]);

with(ListTools);

with(LinearAlgebra);

with(linalg);

DOF := <K || (1 .. 3)>;

yes that is a question. eqs is generated by by another equaction, the question is how to convert from matrix to vector as Tome's sheet without user's input? please guide me

@tomleslie I still get error