MathGroup Archive 2012

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

Search the Archive

Re: Data Format

  • To: mathgroup at smc.vnet.net
  • Subject: [mg127520] Re: Data Format
  • From: Ray Koopman <koopman at sfu.ca>
  • Date: Thu, 2 Aug 2012 04:47:01 -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>

On Aug 1, 2:02 am, "Nicholas Kormanik" <nkorma... at gmail.com> wrote:
> 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?
>
> Thanks.
>
> Nicholas Kormanik

list = {"C1" -> {5.`, 4.`, 7.`, 3.`, 6.`, 6.`, 7.`, 1.`, 5.`, 6.`},
        "C2" -> {2.`, 5.`, 6.`, 7.`, 7.`, 1.`, 5.`, 4.`, 7.`, 2.`}};

Set @@@ (MapAt[Symbol,#,1]&) /@ list
{{5., 4., 7., 3., 6., 6., 7., 1., 5., 6.},
 {2., 5., 6., 7., 7., 1., 5., 4., 7., 2.}}

Mean /@ {C1,C2}
{5., 4.6}



  • Prev by Date: Re: Evaluation of boolean functions in Mathematica 8
  • Next by Date: Re: Why no Import command?
  • Previous by thread: Re: Data Format
  • Next by thread: Re: Data Format