New answers tagged


Using ResourceFunction["CombinePlots"], you can combine arbitrary plots into two-axes plots, without the need to create a new version for every type of plot: ResourceFunction["CombinePlots"][ ListLinePlot[ Accumulate[RandomReal[{0, 1}, {100}]], PlotStyle -> Blue, Frame -> True, FrameStyle -> Blue ], Plot[ x^2, {x, 10, ...


ClearAll[TwoAxisDateListPlotV12] Needs["Calendar`"]; TwoAxisDateListPlotV12[dat1__, dat2__, opts : OptionsPattern[]] := Block[{data1 = dat1, data2 = dat2, plot1, plot2, userOptions, defaultOptions, minx, maxx, temp}, (*display two datelist-graphs on one diagram*) (*span x*) If[DateQ[First@data1["Dates"]] (*find ...


To add to what Kuba said: you can avoid the infinite loop by creating a button that starts the evaluation: Button["Evaluate notebook", NotebookEvaluate[EvaluationNotebook[], InsertResults -> True], Method -> "Queued" ] Note the Method option. Without it, the FE will freeze up completely.


Thanks to Kuba for telling me about DevTools`. It is a very neat package. But I did not want to use Ctrl + ' and then Backspace. But the KernelExecute hint helped me find 16165 which showed how to add a command to a shortcut. The jist is, put your function/command in a .m file (no formatting, exactly how it appears in a notebook) then use this syntax in an ...

Top 50 recent answers are included