>ich habe ein lin. Glgs.-syst. der Form
>equ1 = a x+b y == e
>equ2 = c x+d y == f
>und benoetige die Matrix in der Form { {a,b},{c,d} } sowie die rechte
>Seite {{e},{f}}.
>Wie geht das in Mathematica?
Es gibt viele Wege nach Rom:
sunny% math
Mathematica 2.2 for SPARC
Copyright 1988-94 Wolfram Research, Inc.
-- Open Look graphics initialized --
In[1]:= equ1 = a x + b y == e
Out[1]= a x + b y == e
In[2]:= equ2 = c x + d y == f
Out[2]= c x + d y == f
In[3]:= t = {equ1, equ2} /* Zwischenstufe */
Out[3]= {a x + b y == e, c x + d y == f}
In[4]:= Apply[List, Map[First, Apply[List, t, {1}]], {1}] /. {x -> 1, y -> 1}
Out[4]= {{a, b}, {c, d}}
In[5]:= Last[Transpose[Apply[List, t, {1}]]]
Out[5]= {e, f}
In[6]:= Exit
sunny%
Mit freundlichen Grüßen
Arnd Roth
Abteilung Zellphysiologie, MPI für Medizinische Forschung, Heidelberg
ps. Ich arbeite noch an den Einstellungen für mein Mailprogramm...
|