MathGroup Archive 2003

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

Search the Archive

Re: Unformatted File IO

  • To: mathgroup at
  • Subject: [mg44470] Re: Unformatted File IO
  • From: Bill Rowe <readnewscix at>
  • Date: Wed, 12 Nov 2003 08:01:22 -0500 (EST)
  • Sender: owner-wri-mathgroup at

On 11/10/03 at 4:52 AM, bcolletti at (Bruce W. Colletti) wrote:

> The code splits "hello there" which must stay intact as a list element.  Any
> ideas?  Thanks.

Here is code that will work for your specific example but may not be adequate in general

parseString[x_String] :=
  Module[{p = StringPosition[x, "\""], len = StringLength@x, data},
    If[Length@p == 0, data = ReadList[StringToStream[x], Number],
      p = First /@ p;
      data = StringTake[x, # + {1, -1}] & /@ Partition[p, 2];
      If[len > Last@p, data = Flatten@{data, ReadList[
          StringToStream@StringDrop[x, {1, Last@p}], Number]}]];
 where filename contains your example data.
 Note, this routine assumes any line that contains both numeric and doble quoted string data the numeric data follows the double quoted string data as was the case in your example. If I were to add a line such as

"hello there" 3 "abs" or
 3 "hello there"
 the numeric data will be skipped by this routine.
 This can be changed with additional complexity in the routine.
To reply via email subtract one hundred and nine

  • Prev by Date: Re: orthonormalized eigenvectors
  • Next by Date: Re: Derivative of a funtion evaluated at a point in 3D
  • Previous by thread: Re: Re: Unformatted File IO
  • Next by thread: Re: Re: Unformatted File IO