This version of cvs may be somewhat less broken; public humiliation is
such a good motivator!
(C1) cvs(e,[c]) := block([i,ei,n],
if listp(e) or matrixp(e) then (
e : args(e),
n : length(e),
for i : 1 thru n do (
ei : inpart(e,i),
if c = [true] or (i < n) then cvs(ei,true) else cvs(ei,false)))
else if c=[true] then print(e,",") else print(e))$
(C2) cvs([u,n,k]);
u ,
n ,
k
(D2) DONE
(C3) cvs([a,[b],[[c]]]);
a ,
b ,
C
(D3) DONE
(C4) cvs(matrix([1,2],[3,4],[5,6]));
1 ,
2 ,
3 ,
4 ,
5 ,
6
(D4)
cvs works with matrices that have lists as elements
(C7) matrix([4,5],[[7,2],[9,8]])$
(C8) cvs(%);
4 ,
5 ,
7 ,
2 ,
9 ,
8
(D8) DONE
(C9)
Barton
kamano <kamano@affrc.go.jp>
Sent by: maxima-admin@math.utexas.edu
09/08/2003 08:50 PM
To: maxima@www.ma.utexas.edu
cc:
Subject: [Maxima] saving as CSV, eigensystem
I am a researcher in japanese organization.
My mane is Amano.
I am starting to use maxima.
Question 1 :
Can I save the data (i.e. list,matrix) as CSV format?
Which command should be used?
Queation 2 :
How can I get eigenvalues or eigenvectors as "numeric" (not symbolic)?
_______________________________________________
Maxima mailing list
Maxima@www.math.utexas.edu
http://www.math.utexas.edu/mailman/listinfo/maxima