Re: Pasting tables into Excel
- To: mathgroup at smc.vnet.net
- Subject: [mg38553] Re: Pasting tables into Excel
- From: "Diana Mecum" <diana53 at earthlink.net>
- Date: Thu, 26 Dec 2002 04:34:39 -0500 (EST)
- References: <at9cmq$q22$1@smc.vnet.net> <atcaaf$3ko$1@smc.vnet.net>
- Reply-to: "Diana Mecum" <diana53 at earthlink.net>
- Sender: owner-wri-mathgroup at wolfram.com
Steve, Thanks. I think I was able to reproduce this for lists. Do you know if it would work for the table generated with: << DiscreteMath`Combinatorica` A5 = AlternatingGroup[5] mult[x_?PermutationQ, y_?PermutationQ] := Permute[x, y] MultiplicationTable[A5, mult] // TableForm Thank you, Diana "News Admin" <news at news.demon.net> wrote in message news:atcaaf$3ko$1 at smc.vnet.net... > Here is a little example of how to export in a format that Excel can read: > > Export["C:\\table.csv", {{1, 2}, {3, 4}}, "CSV"] > > > Steve Luttrell > > "Diana" <diana53xiii at earthlink.remove13.net> wrote in message > news:at9cmq$q22$1 at smc.vnet.net... > > Math friends, > > > > If I program Mathematica to calculate a Cayley Table for A_5, for example, > > and it displays on the screen in the notebook, I have not been able to > > figure out how to paste the values into Excel without all the extra > > formatting, such as quote marks. Has someone worked this out? > > > > For example, the Cayley Table for A_5 copies as follows into Excel... > > > > \!\(\* > > TagBox[GridBox[{ > > {"1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", > > "13", > > "14", "15", "16", "17", "18", "19", "20", "21", "22", "23", > "24", > > "25", "26", "27", "28", "29", "30", "31", "32", "33", "34", > "35", > > "36", "37", "38", "39", "40", "41", "42", "43", "44", "45", > "46", > > "47", "48", "49", "50", "51", "52", "53", "54", "55", "56", > "57", > > "58", "59", "60"}, > > {"2", "3", "1", "7", "9", "8", "10", "12", "11", "4", "5", "6", > > "14", > > "15", "13", "19", "21", "20", "22", "24", "23", "16", "17", > "18", > > "37", "39", "38", "40", "42", "41", "46", "47", "48", "43", > "44", > > "45", "49", "51", "50", "52", "54", "53", "58", "59", "60", > "55", > > "56", "57", "25", "26", "27", "28", "29", "30", "31", "32", > "33", > > "34", "35", "36"}, > > {"3", "1", "2", "10", "11", "12", "4", "6", "5", "7", "9", "8", > > "15", > > "13", "14", "22", "23", "24", "16", "18", "17", "19", "21", > "20", > > "49", "50", "51", "52", "53", "54", "55", "56", "57", "58", > "59", > > "60", "25", "27", "26", "28", "30", "29", "34", "35", "36", > "31", > > "32", "33", "37", "39", "38", "40", "42", "41", "46", "47", > "48", > > "43", "44", "45"}, > > {"4", "6", "5", "1", "3", "2", "11", "10", "12", "8", "7", "9", > > "25", > > "27", "26", "28", "30", "29", "34", "35", "36", "31", "32", > "33", > > "13", "15", "14", "16", "18", "17", "22", "23", "24", "19", > "20", > > "21", "50", "49", "51", "55", "56", "57", "52", "53", "54", > "58", > > "60", "59", "38", "37", "39", "43", "44", "45", "40", "41", > "42", > > "46", "48", "47"}, > > {"5", "4", "6", "8", "7", "9", "1", "2", "3", "11", "12", "10", > > "26", > > "25", "27", "31", "32", "33", "28", "29", "30", "34", "36", > "35", > > "38", "37", "39", "43", "44", "45", "40", "41", "42", "46", > "48", > > "47", "13", "14", "15", "16", "17", "18", "19", "20", "21", > "22", > > "23", "24", "50", "51", "49", "55", "57", "56", "58", "60", > "59", > > "52", "53", "54"}, > > and so on... > > > > Thanks, Diana > > > > > > > > > > > > > > > >