Other Way than Print[] for Intermediate Results
- To: mathgroup at smc.vnet.net
- Subject: [mg60385] Other Way than Print[] for Intermediate Results
- From: "kristoph" <kristophs.post at web.de>
- Date: Wed, 14 Sep 2005 05:26:38 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
I'm looking for a neat way to safe intermediate results for simulating
loads of recursive functions. This is the way I solved it, but
unfortunatly the command print, prints all the results which I'm not
interested in.
s[t_] :=For[k = 0,
k â?¤ t,k++,Buffer[k]; Rating[k];
Print[VirtualBuffer[k]];Print[VirtualRating[k]]
with
Buffer[k_ /; k == 0] := VirtualBuffer[k] = Table[Mod[α
AverageRating[0] + θ,λ], {i, 1, n}]
The other tables look almost the same, but I don't want any confusion.
All I'm looking for is the last result of s[t_] not the intermediates.
VirtualBuffer and VirtualRating are vectors which contain intermediate
results. For[] does not seem to calculate the values and safe them
without printing the values.
Please help, thanks.