Re: Data Format
- To: mathgroup at smc.vnet.net
- Subject: [mg127516] Re: Data Format
- From: awnl <awnl at gmx-topmail.de>
- Date: Thu, 2 Aug 2012 04:45:41 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-newout@smc.vnet.net
- Delivered-to: mathgroup-newsend@smc.vnet.net
- References: <jvaran$751$1@smc.vnet.net>
Hi,
> Please consider the following code, which is data imported directly into
> Mathematica via a .mtp file (Minitab Portable Worksheet), and then using
> list assignment:
>
> list = {"C1" -> {5.`, 4.`, 7.`, 3.`, 6.`, 6.`, 7.`, 1.`, 5.`, 6.`}, "C2"
> -> {2.`, 5.`, 6.`, 7.`, 7.`, 1.`, 5.`, 4.`, 7.`, 2.`}}
>
> The following two commands work:
>
> Mean["C1" /. list]
>
> Mean["C2" /. list]
>
> However I would prefer to be able to issue the following commands instead:
>
> Mean[C1]
>
> Mean[C2]
>
> How can the code at top be converted so that these simpler commands will
> work?
For just this simple case I wouldn't suggest to create the symbols C1
and C2. For more complicated cases it might be a reasonable choice but
probably there are better ways to deal with this. Anyway, this will do
what I think you want:
(Set @@ {Symbol[#1], #2}) & @@@ list
it will define the symbols C1 and C2 and set their values to the
corresponding lists. @@ and @@@ are shortcuts for Apply.
hth
Albert