If you are serious about using this extensively, consider making a function based on CreateDocument
...
Here is one way to pursue Szabolcs's line of thought. What follows is a function based on CreateDocument[]
that can be used in conjunction with the (now somewhat neglected) option DisplayFunction
, which handles where the output of graphics functions should be shown.
First, the custom display function:
popup[gr_] := CreateDocument[gr, "CellInsertionPointCell" -> Cell[],
ShowCellBracket -> False, WindowElements -> {},
WindowFrame -> "Generic", WindowSize -> All,
WindowTitle -> None, WindowToolbars -> {}]
(thanks to Oleksandr for "CellInsertionPointCell"
.)
Using it is now as simple as
Plot[Sin[x], {x, 0, 2 π}, DisplayFunction -> popup]
which should yield a small window like this on Linux:

or this on Windows (thanks to belisarius):

or this on Mac OS X (thanks to Jens):

It will also work with 3D graphics, and will of course retain the interactivity.
A variation proposed by Szabolcs uses DocumentNotebook[]
instead of CreateDocument[]
:
popup[gr_] := DocumentNotebook[gr, "CellInsertionPointCell" -> Cell[],
ShowCellBracket -> False, WindowElements -> {},
WindowFrame -> "Generic", WindowSize -> All,
WindowTitle -> None, WindowToolbars -> {}]
This produces a cell that is a mini-notebook of sorts, with a button that yields a popup version of the plot if pressed.
howto/CreateAComputableDocumentFormatFile
. $\endgroup$