MathGroup Archive 1999

[Date Index] [Thread Index] [Author Index]

Search the Archive

RE: How to print a determinant in the traditional way


Try this:

t=Table[Random[],{3},{3}] (*a dim 3 square matrix*)

ShowDet[m_]:=CellPrint[Cell[BoxData[
RowBox[{"\[VerticalSeparator]", GridBox[m],"\[VerticalSeparator]"}]],
    "Output"]]

ShowDet[t]

Hope this helps,


****************************************
Jean-Marie THOMAS
mailto:jmthomas at agat.net
Conseil et Audit en Ingenierie de Calcul
Strasbourg, France
http://www.agat.net
****************************************

-----Original Message-----
From: Chee Lim Cheung [mailto:cheelc at mbox2.singnet.com.sg]
To: mathgroup at smc.vnet.net
Subject: [mg15883] [mg15832] How to print a determinant in the traditional way


Hi Mathematica experts,

I am trying to get Mathematica to print a determinant of order 2, 3 or
higher in the traditional manner like |A| with the elements enclosed
between two vertical bars by the side. Is there a clean way to do this
using Mathematica?

Thanks
Chee




  • Prev by Date: Re: interpolatingfunction
  • Next by Date: Losing Mathematica password
  • Previous by thread: How to print a determinant in the traditional way
  • Next by thread: Re: How to print a determinant in the traditional way