Re: Parsing awkward text in a nested list

• To: mathgroup at smc.vnet.net
• Subject: [mg107758] Re: Parsing awkward text in a nested list
• From: dh <dh at metrohm.com>
• Date: Thu, 25 Feb 2010 07:45:50 -0500 (EST)
• References: <hm56mc\$k69\$1@smc.vnet.net>

```Hi,
you may e.g. use a rule:

list1 /. {{x1_, x2_}, x3 : {__}} :> {x1,
StringSplit[x2, {",", " ", "{", "}"} ..], x3}

Daniel

On 25.02.2010 07:51, Garapata wrote:
> I have a nested list with the following dimensions:  {3,2,2}
>
> It looks something like this:
>
> list1 =
> {
> {{"item1", "{ text, text, text}"}, {"item2", 24}},
> {{"item1", "{ text, text, text}"}, {"item2", 24}},
> {{"item1", "{ text, text, text}"}, {"item2", 24}}
> }
>
>
> I want to get the following:
>
> list2 =
> {
> {{"item1", {"text", "text", "text"}}, {"item2", 24}},
> {{"item1", {"text", "text", "text"}}, {"item2", 24}},
> {{"item1", {"text", "text", "text"}}, {"item2", 24}}
> }
>
> I've come up with a very cumbersome way to do it:
>
> Diagonal[ReplacePart[list1,{#,1,2}-
>> StringSplit[StringTrim[StringTrim[ list1[[All,1,2]],("{"|"}")]],","]
> [[#]]]&/@Range[Length[list1]]]
>
>
> Can anyone suggest a simpler or more elegant solution.
>
> Thx.
>
>

--

Daniel Huber
Metrohm Ltd.
Oberdorfstr. 68
CH-9100 Herisau
Tel. +41 71 353 8585, Fax +41 71 353 8907
E-Mail:<mailto:dh at metrohm.com>
Internet:<http://www.metrohm.com>

```

• Prev by Date: Re: interpolation problem with 2dimensional function
• Next by Date: Re: Parsing awkward text in a nested list
• Previous by thread: Re: Parsing awkward text in a nested list
• Next by thread: Re: Parsing awkward text in a nested list