MathGroup Archive 2010

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

Search the Archive

Re: Table of Values

On 5/4/10 at 6:30 AM, nkormanik at (Nicholas Kormanik) wrote:

>The Mathematica mini-program below has been useful for solving for
>x, given the other inputs.  It is analogous to a single-shot rifle:

>x =.

>tradecomission := 9.99
>feepercontract := .75

>pricepercontract := .73
>numbercontracts := x

>totalcost := 8484

Since all of the above are constants, it really would be better
to use Set rather than SetDelayed. That is doing:

tradecomission = 9.99;
feepercontract = .75;

pricepercontract = .73;
totalcost = 8484;

Note, I omitted numbercontracts:=x since this isn't needed. In
fact, Solve isn't needed since you've already done the work
Solve would do, i.e.,

In[32]:= Floor[(totalcost -
tradecomission)/(pricepercontract*100 +

Out[32]= 114

Here, I've used the Floor function since your table suggest you
only want the integer portion of the solution.

To create your table use Table. That is:

    Floor[(totalcost - tradecomission)/(pricepercontract*100 +
        feepercontract)]}, {pricepercontract, .73, .84, .01}],
  TableHeadings -> {None, {"Price/Contract", "No Contracts"}}]

will create a nicely formatted table. The function Table does
the actual computations. The function TableForm simply formats
the output in a nice fashion.

  • Prev by Date: Re: FortranForm
  • Next by Date: Re: Table of Values
  • Previous by thread: Table of Values
  • Next by thread: Re: Table of Values