Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2007
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2007

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

Search the Archive

Re: Importing and retaining graphics

  • To: mathgroup at smc.vnet.net
  • Subject: [mg75196] Re: [mg75169] Importing and retaining graphics
  • From: Murray Eisenberg <murray at math.umass.edu>
  • Date: Fri, 20 Apr 2007 00:36:58 -0400 (EDT)
  • Organization: Mathematics & Statistics, Univ. of Mass./Amherst
  • References: <200704190832.EAA04133@smc.vnet.net>
  • Reply-to: murray at math.umass.edu

1) Just go ahead and delete the other cells (being sure to click on only 
the individual cell brackets of what you want to delete, and not the 
larger cell bracket that encompasses both the Show cell and the 
resulting displayed graphic.

2) Create a new cell, say a text cell and type something in that cell, 
say a space.

3) Select the displayed graphic by clicking on it;  you should see a 
bounding box around it.

4) Now use the Edit menu or the usual keystrokes to copy the selected 
graphic and to paste it into the text cell.

   Now you may want to backspace over the initial space you typed into 
the cell.

   You probably now want to delete the "From In[n]" cell from which you 
copied the displayed graphic.

5) Put whatever else you wish to go with the graphic into the cell -- 
text, other graphics, formulas, whatever. Format the cell as you wish 
(change its alignment, e.g., if you wish).

6) If you wish to prevent accidental erasure of the new cell you've 
created, select the cell.  From the Cell menu, select Cell Properties 
and click "Cell Editable" so as to remove the checkmark there.

    For even more security, BEFORE you make the cell not editable, make 
it undeletable as follows:

     - From the Format menu select Option Inspector.

     - In the Options Inspector window, make sure the entry next to 
"Show option values for" is "selection.

     - next to the Lookup button type "deletable" and click the Lookup 
button.  You'll see the collapsed outline in the lower window open with 
the property Deletable highlighted.

     - on the same line as  "Deletable..........True", click the 
checkmark at the extreme right.  You will see "True" change to "False".

     - click the Apply button and close the Options Inspector.

     - your cell will now be set so you cannot delete it.





AES wrote:
> OK, I've learned that
> 
>    Import["/Users/AES/Desktop/myImage.jpg"]
> 
> will import an image from my Mac desktop into a notebook, and then
> 
>    Show[%, ImageSize->3*72]
> 
> will display it.  But:
> 
> 1)  How do I then "freeze" or retain that graphic or that image, in a 
> displayed or rendered form, as a permanently retained and displayed 
> image cell in this notebook, with the two lines above deleted?  
> 
> 2) Is there an easier way, on a Mac, to Drag and Drop, or Copy and 
> Paste, a JPEG image like this (or a PDF page), from the Finder or some 
> Mac app into a notebook, as a permanently retained cell in that 
> notebook?  (Permanently retained until explicitly deleted, that is.)
> 
> 3)  What Format => Style do I assign to "permanently retained image 
> cells" like this?  
> 
> (I'd prefer that they not have the same style as graphics cells that are 
> generated anew each time the notebook is executed; I don't want them to 
> be selected when I Option-click on an generated image cell boundary, or 
> to be included in animations of generated cells.)
> 
> 4)  Would Wolfram maybe want to add to the Help documentation for 
> Import[] a pointer to the use of $Path?  
> 
> Took me a lot of searching around before I discovered how to format the 
> right path, and what paths Import[] actually searched.
> 

-- 
Murray Eisenberg                     murray at math.umass.edu
Mathematics & Statistics Dept.
Lederle Graduate Research Tower      phone 413 549-1020 (H)
University of Massachusetts                413 545-2859 (W)
710 North Pleasant Street            fax   413 545-1801
Amherst, MA 01003-9305


  • Prev by Date: Re: Help in analytical integration 3
  • Next by Date: RE: Importing and retaining graphics
  • Previous by thread: Importing and retaining graphics
  • Next by thread: RE: Importing and retaining graphics