Re: ListManipulationQuestion
- To: mathgroup at smc.vnet.net
- Subject: [mg93196] Re: ListManipulationQuestion
- From: lynette <xiaochu at gmail.com>
- Date: Thu, 30 Oct 2008 02:04:55 -0500 (EST)
- References: <ge9f0p$95h$1@smc.vnet.net>
I got an email, Let me explain a little bit more about this problem
I think nextprice[...] doesn't return 90.9091 is due to the
typesetting of the webpage. I tried it again, the nextprice[...]
seems work on single parametre,
but it doesn't work with a list.I re-format it, and put it below.
Please help, thanks a lot.
successors[{s_Integer, {{nhu_Integer, nhd_Integer}, {nlu_Integer,
nld_Integer}}}] := {
{1, {{nhu + 1, nhd}, {nlu, nld}}},
{1, {{nhu, nhd + 1}, {nlu, nld}}},
{2, {{nhu, nhd}, {nlu + 1, nld}}},
{2, {{nhu, nhd}, {nlu, nld + 1}}}
}
\[Delta]hu = 1.2;
\[Delta]hd = 1./\[Delta]hu;
\[Delta]lu = 1.1;
\[Delta]ld = 1./\[Delta]lu;
nextprice[p_, n_] := price[p] Total[Flatten[(n[[2]] - p[[2]]) {{\
[Delta]hu, \[Delta]hd}, {\[Delta]lu, \[Delta]ld}}]];
p_ means previous node, n_ means next node, which is one of the
successors of p_.
input: nextprice[{1, {{0, 0}, {0, 0}}}, #] & /@ successors[{1, {{0,0},
{0, 0}}}]
output: {120., 83.3333, 110., 90.9091}
I cannot get the price of successors as I want. For example, {1, {{1,
0}, {0, 0}}} which is one of the successor of
present node {1, {{0, 0}, {0, 0}}}.
input: price[{1, {{1, 0}, {0, 0}}}]
output: price[{1, {{1, 0}, {0, 0}}}]