Services & ResourcesWolfram ForumsMathGroup Archive

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

Formatting table output

• To: mathgroup at smc.vnet.net
• Subject: [mg66685] Formatting table output
• From: "masha" <mshunko at gmail.com>
• Date: Sat, 27 May 2006 03:51:20 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

Hello,

I am doing sensitivity analysis of a function called expprofit with
repsect to \[Sigma]q and I would like to get output in a nice table
format. I get a table format using the code below, but in the last
three columns, the output is of the form "a -> 0.2". I would like it to
be just 0.2
Is there a way to get rid of the variable name and the arrow?

TableForm[Table[Join[{sq}, Flatten[FindMaximum[expprofit , {ß, 0.5,
0,
         4}, {a, 1}, {b, 1}]]], {sq, 0.1, 0.3, 0.05}],
          TableHeadings -> {{}, {"sq", "Expected Profit", "Beta", "a",
"b"}}]

Thank you very much,
Masha

• Follow-Ups:
  • Re: Formatting table output
    • From: gardyloo <gardyloo@mail.wsu.edu>