Re: Write long table into file problem

*To*: mathgroup at smc.vnet.net*Subject*: [mg51056] Re: Write long table into file problem*From*: "Peter Pein" <petsie at arcor.de>*Date*: Sun, 3 Oct 2004 05:47:23 -0400 (EDT)*References*: <cjj806$brl$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

strm = OpenWrite["~/output/test.dat", Pagewidth->Infinity]; is sufficient, I suppose ;-) -- Peter Pein, Berlin to write to me, start the subject with [ "Jiang Xiao" <jiang.xiao at physics.gatech.edu> schrieb im Newsbeitrag news:cjj806$brl$1 at smc.vnet.net... > hi,all > > I have a problem in saving a table into a file, > > say i want to write a list of 7 numbers into file, I use the following code > > ------------------------------ > strm = OpenWrite["~/output/test.dat"]; > a = Random[ ]; > temp = {{a, a, a, a, a, a, a}}; > Write[strm, OutputForm[TableForm[Map[FortranForm, temp, {2}], > TableSpacing -> {0, 3}]]]; > Close[strm]; > ------------------------------ > > and here is how test.dat looks like: > ---------------------------------------- > 0.7347723298312644 0.7347723298312644 0.7347723298312644 > 0.734772329831\ > 2644 0.7347723298312644 0.7347723298312644 0.7347723298312644 > ---------------------------------------- > > it save to two line with "\" at the end of first line. > Are there anybody know how to save it into just one line? > > thanks you all, > > Jiang >