3
$\begingroup$

How do I save a graph that has been drawn with the drawing tool? As you can see from my screenshot, all the save buttons are disabled.

Hand drawn graphH

Improve this question
$\endgroup$
5
  • $\begingroup$ Select all elements of your graphics with mouse, then right-click on it and choose "Group". Select the graphics again with left-click and choose from menu "File"->"Save Selection As..." . This worked for me. But I recommend that you create your graphics programmatically instead. $\endgroup$
    – Pinti
    Apr 14, 2017 at 11:54
  • $\begingroup$ Can you give me an example how to create a graph programmatically? $\endgroup$
    – bios
    Apr 14, 2017 at 11:58
  • $\begingroup$ This draws 5 random ellipses and exports the graphics. r := RandomReal[]; ellipse := Circle[{r, r}, {r, r}]; gr = Graphics[Table[{RandomColor[], ellipse}, {5}]]; Export[FileNameJoin[{NotebookDirectory[], "elipses.png"}], gr]; gr $\endgroup$
    – Pinti
    Apr 14, 2017 at 12:09
  • 1
    $\begingroup$ @Pinti There are many things which are easier to draw with the drawing tool rather than using code, I assume OP's scenario is one of those scenarios. $\endgroup$
    – C. E.
    Apr 14, 2017 at 12:48
  • $\begingroup$ @Pinti I do not want 5 random elipses. I belive this code does not work for me. What I mean that is not what I want $\endgroup$
    – bios
    Apr 14, 2017 at 15:09

1 Answer 1

Reset to default
2
$\begingroup$

You have to right click on the bracket to the right of the figure and then choose "Save Selection As".

enter image description here

Alternatively you can copy the figure with ctrl+c on Windows or cmd+c on MacOS, or with the copy button in the "Edit" menu, and then paste it (with ctrl+v, cmd+v or via the edit menu) into a code cell where you can export it with the Export function.

enter image description here

Improve this answer
$\endgroup$
3
  • $\begingroup$ Thanks for your suggestion. In order to save the graph, you have to draw the graph in the area that is generated by code like {Graphics[{}, ImageSize -> 800]} $\endgroup$
    – bios
    Apr 14, 2017 at 15:20
  • $\begingroup$ @bios Yes, I assumed that is what you had done. I included it in my screenshot for clarity. $\endgroup$
    – C. E.
    Apr 14, 2017 at 15:28
  • $\begingroup$ Thank you for your kind answer! $\endgroup$
    – bios
    Apr 14, 2017 at 15:33

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.

Not the answer you're looking for? Browse other questions tagged or ask your own question.