Re: Pasting tables into Excel
- To: mathgroup at smc.vnet.net
- Subject: [mg38560] Re: Pasting tables into Excel
- From: "Diana Mecum" <diana53 at earthlink.net>
- Date: Thu, 26 Dec 2002 04:34:54 -0500 (EST)
- References: <ateplc$90p$1@smc.vnet.net>
- Reply-to: "Diana Mecum" <diana53 at earthlink.net>
- Sender: owner-wri-mathgroup at wolfram.com
Matthias, I am not able to reproduce your results for the table generated with the following code: << DiscreteMath`Combinatorica` A5 = AlternatingGroup[5] mult[x_?PermutationQ, y_?PermutationQ] := Permute[x, y] MultiplicationTable[A5, mult] // TableForm I am wanting to get this table to print out in Excel without formatting. Thanks, Diana <Matthias.Bode at oppenheim.de> wrote in message news:ateplc$90p$1 at smc.vnet.net... > Hello Diana, > > my method using WINDOWS NT 4.1; Mathematica 4.1; EXCEL 97: > > 1. Blacken the contents of the Mathematica cell you wish to copy. > 2. Use right key of mouse. > 3. Select "Copy" - not: "Copy As"! > 4. Jump into an EXCEL cell. > 5. Paste. > > On my system I get the same output as it appears in Mathematica which shows > my output in StandardForm. I do not get FullForm when copying. > > It does, however, happen from time to time that - using my standard prcedure > - I paste Mathematica cell contents into an e-mail where it miraculously and > inexplicably appears in FullForm. > > Good luck! > > Matthias Bode > Sal. Oppenheim jr. & Cie. KGaA > Koenigsberger Strasse 29 > D-60487 Frankfurt am Main > GERMANY > Tel.: +49(0)69 71 34 53 80 > Mobile: +49(0)172 6 74 95 77 > Fax: +49(0)69 71 34 95 380 > E-mail: matthias.bode at oppenheim.de > Internet: http://www.oppenheim.de > > > > > -----Ursprüngliche Nachricht----- > Von: Diana [mailto:diana53xiii at earthlink.remove13.net] > Gesendet: Donnerstag, 12. Dezember 2002 07:36 > An: mathgroup at smc.vnet.net > Betreff: Pasting tables into Excel > > > 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 > > > > > > >