Re: simplex tableau help wanted
- To: mathgroup at christensen.cybernetics.net
- Subject: [mg931] Re: [mg820] simplex tableau help wanted
- From: hay at haystack.demon.co.uk
- Date: Wed, 3 May 1995 00:10:16 -0400
Doug Gwyn <gwyn at arl.mil>;[mg820] simplex tableau help wanted
writes
> I'm a newcomer to Mathematica (Windows) and would appreciate some
> assistance in a project I'm working on, to teach linear
> programming. What I want is to show each tableau in an example
of> Danzig's simplex algorithm, preferably with pivot flagged (*)
etc., > certainly with variable labels along the top and side of
the> matrix. Could some experienced Mathematica programmer suggest
the > general structures to use for this? If there is a sample
package
> that does something very similar, I'd appreciate finding it.
> Thanks for any and all help!
The following shows some of the things that I have have found
useful in writing this kind of code.
Block is used to keep m the same after the display.
I have set the horizontal alignment to Right for integer entries.
"a\n " is a trick to raise the top headings.
In[1]:=
m = Table[Random[Integer,{-9,9}],{3},{5}];
In[4]:=
Block[{mm = m},
mm[[2,3]] = StringForm["[``]",m[[2,3]]];
TableForm[
mm,
TableHeadings ->
{{"a","b","c"},{"a\n ","b","c","d","e"}},
TableAlignments -> {Automatic, Right}
]
]
Out[4]//TableForm=
a b c d e
a 8 2 -7 7 -4
b 3 7 [-4] 6 8
c 2 6 2 7 -5
We should be able to get a lot better layout with the next version
of Mma.
You may find something of interest in my package
Strang`LinearAlgebra` (on MathSource).
I can send you a package for Floyd's method for least weight routes
that may be a bit more relevant.
Allan Hayes
hay at haystack.demon.co.uk