Services & ResourcesWolfram ForumsMathGroup Archive

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

Re: Other Way than Print[] for Intermediate Results

• To: mathgroup at smc.vnet.net
• Subject: [mg60442] Re: Other Way than Print[] for Intermediate Results
• From: "Jens-Peer Kuska" <kuska at informatik.uni-leipzig.de>
• Date: Fri, 16 Sep 2005 03:50:33 -0400 (EDT)
• Organization: Uni Leipzig
• References: <dg8rcj$23g$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

Hi,

what may Sow[] and Reap[] do ??

Regards
  Jens

"kristoph" <kristophs.post at web.de> schrieb im 
Newsbeitrag news:dg8rcj$23g$1 at smc.vnet.net...
| 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.
|