New answers tagged


Use Group from the right-click menu to group your annotations and select Copy Graphics Selection from the right-click menu. Then you can paste the selected objects into a new cell or into an existing graphics object.


The lack of ability to abort a running computation is Mma's greatest aggravation. After reading everyone's comments here, I still can't see why the kernel does not have a hardware watchdog timer that interrupts once/second to check for an Abort signal. It would slow everything down by 0.00001%; so what? Anyway, here is my workaround: inside your deepest ...


I was able to find this workaround, I know not what it does. In[1]:= Pause[3];(*abortable*) Out[1]= $Aborted In[2]:= Quiet@NotebookEvaluate@"abc"; In[3]:= Pause[3];(*unabortable*) In[4]:= MathLink`LinkAddInterruptMessageHandler[$ParentLink] In[5]:= Pause[3];(*Aborts are back!*) Out[5]= $Aborted


Mathematica has written nice Documentation about shortening the output and its options. Summary In general change $OutputSizeLimit to increase the limit Mathematica shorten the output. For specific cases, use InputForm. but be aware in both cases you will have performance penalties.


Beside Mathematica built-in Palettes which are basically floating window, you can access with Palettes option in Menu Bar, there are also some built-in toolbar in Window > Toolbar which will be shown below menu bar just like the picture you mentioned. If you want to create your own floating Palette, follow this Tutorial on Wolfram. If you want to create ...


Assuming they are consecutive cells you can do: (*make sure this cell does not produce output because then NextCell is the output cell*) newwords = {...}; selectCell = NextCell[]; SelectionMove[selectCell, Before, CellContents]; NotebookFind[EvaluationNotebook[], "\"", Next, CellContents]; SelectionMove[EvaluationNotebook[], After, Character]; ...


Here's an attempt at something like this: Dynamic@Row@{$sym, " = ", Symbol@$sym} Unprotect@FE`CacheTemplateAndUsage; FE`CacheTemplateAndUsage[sym_String] /; Context@arg == "Global`" := ( $sym = sym; MathLink`CallFrontEnd@ FrontEnd`CacheTemplateAndUsagePacket[FrontEnd`InputNotebook[], sym, Null] ) The symbol name and its value is ...


This addition to your style definition should do what you need: TaggingRules -> {"done" -> True}, CellDingbat -> Cell[BoxData[ CheckboxBox[ Dynamic[CurrentValue[ ParentCell[EvaluationCell[]], {TaggingRules, "done"}] ]]]


SpellCheck is done on cells having the option LanguageCategory->"NaturalLanguage". This appears in the style definition of the default stylesheet (Default.nb) for all text based styles (i.e. Text, Section, SubSection, etc.). What you can do is create your own stylesheet derived from Default.nb (or other stylesheets). Create a new notebook ...


To add a new Item style with Checkbox by editing the notebook stylesheet: Select Format >> Edit Styleheet from the menu to open the stylesheet notebook. In the input field a the name for new style (ItemCheckbox) Select Show Expression from the Cell menu to make the code behind the new cell visible. Replace the code with Cell[StyleData["...


To add a new style programmatically for item-with-checkbox-dingbat using Checkbox[] as CellDingbat use: SetOptions[EvaluationNotebook[], StyleDefinitions -> Notebook[{Cell[StyleData[StyleDefinitions -> "Default.nb"]], Cell[StyleData["ItemCheckbox"], CellDingbat -> CheckboxBox[False], CellMargins -> {{81, 10}...

Top 50 recent answers are included