Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2006
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2006

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

Search the Archive

Re: Add Quotation Marks to Data in a file

  • To: mathgroup at smc.vnet.net
  • Subject: [mg69744] Re: [mg69726] Add Quotation Marks to Data in a file
  • From: "Chris Chiasson" <chris at chiasson.name>
  • Date: Fri, 22 Sep 2006 01:04:12 -0400 (EDT)
  • References: <200609211131.HAA07846@smc.vnet.net>

Assuming those entries 6 x 6 are strings inside Mathematica, you could
just replace them using string expressions.

In[1]:=
xpr[1]={{a,b,"6 x 6"},{c,"5 x 4",z}};
ExportString[xpr[1],"CSV"]

Out[2]=
a,b,6 x 6
c,5 x 4,z

In[3]:=
xpr[2]=xpr[1]/.blah_String:>
        StringReplace[blah,(a__~~"x"~~b__):>"\""~~a~~"x"~~b~~"\""];
ExportString[xpr[2],"CSV"]

Out[4]=
a,b,"6 x 6"
c,"5 x 4",z

On 9/21/06, JOHN ERB <john_c_erb at prodigy.net> wrote:
> I have a comma-separated file (CSV) that looks like
>
> Circle, 6 x 6, 5, 0.23
> Circle, 7 x 7, 5, 0.29
> ...
>
> How do I add quotation marks around the second element
> so that when I export the data to an CSV file, I get
>
> Circle, "6 x 6", 5, 0.23
> Circle, "7 x 7", 5, 0.29
> ...
>
> Thank you
> John C. Erb
>
>


-- 
http://chris.chiasson.name/


  • Prev by Date: FormatType styles in StyleSheets
  • Next by Date: Re: TEXT SIZE 12 ?
  • Previous by thread: Add Quotation Marks to Data in a file
  • Next by thread: Re: Add Quotation Marks to Data in a file