Re: Copy/paste question
- To: mathgroup at smc.vnet.net
- Subject: [mg38239] Re: Copy/paste question
- From: kzhang at flashmail.com (Kezhao Zhang)
- Date: Tue, 10 Dec 2002 04:09:33 -0500 (EST)
- References: <asn59g$48m$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Try:
In[1]:=TableForm[Table[i +
10 j, {i, 3}, {j, 2}], TableSpacing -> {0, 5}] // OutputForm
Out[2]//OutputForm=
11 21
12 22
13 23
The output can be copied and pasted in the form you wanted. The
TableSpacing option is necessary to make sure there is no blank line
between adjacent rows.
One drawback of this approach is that you have to mannually delete the
line containing "Out[2]//OutputForm=".
Kezhao
Kirk Reinholtz <kirk.reinholtz at jpl.nasa.gov> wrote in message news:<asn59g$48m$1 at smc.vnet.net>...
> Given some output in a notebook, say from
> Table[i+10 j, {i, 3}, {j, 2}] // TableForm
>
> How do I copy/paste the results into say this email? Everything I try
> grabs the cell expression and formatting info along with the text, which
> isn't what I want. I just want the table, more or less as it appears in
> the notebook, to copy/paste into my email (or whatever). For example, I
> want to eval the above then copy/paste into this mail, resulting in:
>
> 11 21
> 12 22
> 13 23
>
> I hacked it by doing Export["t.txt",%] but that's a bit clumsy.
>
> Thanks in advance ...