writing real numeric data to file in scientific form
- To: mathgroup at smc.vnet.net
- Subject: [mg130736] writing real numeric data to file in scientific form
- From: nbfazel at gmail.com
- Date: Tue, 7 May 2013 03:56:28 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-outx@smc.vnet.net
- Delivered-to: mathgroup-newsendx@smc.vnet.net
Is there a way to write an array of real data to a text file in scientific form?
I can get Export[] to do the writing, and I can also use ScientificForm[] to display the data in scientific form inside a Mathematica NoteBook; but when I combine the two, the data that is written to file is not in scientific form. This is what I used:
Export["mydata.txt", {ScientificForm[mydata, 6]}, "TABLE"];
This is how it looks:
ScientificForm[{8.300048919181171*^-65, 5.575850742922402*^-55, 8.927992896530116*^-47, 7.205049522485539*^-40, 4.94204894434479*^-34, 5.034140314718283*^-29, 1.2067785992558568*^-24, 5.2496316239671124*^-21, 5.507580652233924*^-18, 1.7824614550778995*^-15, 2.1745171650640118*^-13, 1.1861424459734618*^-11, 3.3310227611485466*^-10, 5.41636564782457*^-9, 5.416215338098706*^-8,
<clip>
0.004175979147733344, 0.0038120308153719064, 0.0034771613424270783, 0.0031734646348369746, 0.0028592374341726893, 0.0025163126410306493, 0.0021491182575077454, 0.0017560628240768238, 0.0013354267428814532, 0.0008853494722323165}, 6]
I would appreciate any tips on how to do this.
Neil