Re: Export list to Excel without brackets
- To: mathgroup at smc.vnet.net
- Subject: [mg122179] Re: Export list to Excel without brackets
- From: Chris Degnen <degnen at cwgsy.net>
- Date: Wed, 19 Oct 2011 05:34:24 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- References: <j7jorq$8nq$1@smc.vnet.net>
On Oct 18, 12:44 pm, paul <paulvonhip... at yahoo.com> wrote:
> Like a previous poster, I would like to export a list to Excel. Here
> is my list:
> {{{1.27,1.12,1.00,0.90,0.83},{0.27,0.12,0.00,-0.10,-0.17},
> {0.66,0.56,0.49,0.43,0.38},{0.72,0.57,0.49,0.44,0.42}},
> {{1.09,1.03,0.97,0.93,0.89},{0.09,0.03,-0.03,-0.07,-0.11},
> {0.27,0.25,0.23,0.21,0.20},{0.29,0.25,0.23,0.22,0.23}}}
>
> I would like it to arrive in Excel in this layout:
>
> 1.27 0.27 0.66 0.72
> 1.12 0.12 0.56 0.57
> 1.00 0.00 0.49 0.49
> 0.90 -0.10 0.43 0.44
> 0.83 -0.17 0.38 0.42
>
> 1.09 0.09 0.27 0.29
> 1.03 0.03 0.25 0.25
> 0.97 -0.03 0.23 0.23
> 0.93 -0.07 0.21 0.22
> 0.89 -0.11 0.20 0.23
>
> Suggestions welcome.
One simple way is this:
list={{{1.27,1.12,1.00,0.90,0.83},{0.27,0.12,0.00,-0.10,-0.17},
{0.66,0.56,0.49,0.43,0.38},{0.72,0.57,0.49,0.44,0.42}},
{{1.09,1.03,0.97,0.93,0.89},{0.09,0.03,-0.03,-0.07,-0.11},
{0.27,0.25,0.23,0.21,0.20},{0.29,0.25,0.23,0.22,0.23}}};
Export["c:\\temp\\list.csv",Insert[Flatten[Map[Transpose,list],1],{},
6]];
Run["start excel c:\\temp\\list.csv"];