New answers tagged

2

Rotate ArrayPlot instead of Animate: Animate[Rotate[#, 180 Degree] & @ ArrayPlot[CellularAutomaton[n, {{1}, 0}, {40, All}]], {{n, 89}, 0, 255, 1}, AnimationRunning -> False] or use the option DataReversed -> {True, True} in ArrayPlot: Animate[ArrayPlot[CellularAutomaton[n, {{1}, 0}, {40, All}], DataReversed -> {True, True}], {{n, 89}, ...


1

Style[#, DefaultOptions -> {Panel -> {Background -> LightBlue}}] &@ Manipulate[ArrayPlot[CellularAutomaton[n, {{1}, 0}, {40, All}] /. 0 -> LightBlue], {n, 0, 255, 1}, Method -> {"ContentAreaBackground" -> LightBlue}] Style[#, DefaultOptions -> {Panel -> {Background -> LightBlue}}] &@ Manipulate[Plot[Sin[n x],...


9

You can wrap Animate and Manipulate with Style and set the DefaultOptions for Panel: Style[#, DefaultOptions -> {Panel -> {Background -> LightBlue}}] & @ Animate[ArrayPlot[CellularAutomaton[n, {{1}, 0}, {40, All}]], {n, 0, 255, 1}, AnimationRunning -> False] Style[#, DefaultOptions -> {Panel -> {Background -> LightBlue}}]...


0

Go to Format / Option Inspector Show Option Values: change from Selection to Global Preferences Go to Global Options / System Configurations / ScreenResolutionCompatibilityMode - False Restart Mathematica


3

The Default.nb styles define them up to "Subsubsubsubsection" so you have two more levels to go. They are not included in the Format>Style menu but you can use shortcuts. Hit Tab/Backspace to navigate down/up in section level. (coursor needs to be a the beginning of the cell). If you need more you can define/edit a custom stylesheet and add ...


2

Not giving any guarantees but try with: SetOptions[ EvaluationNotebook[] , InputAutoReplacements -> { "test" -> ToBoxes @ Dynamic[DateString[], DestroyAfterEvaluation -> True] } ]


4

I figured out the answer myself. The problem can be solved by editing the stylesheet with a text editor. To be specific: Backup the original WolframAlphaNotebook.nb. Open the WolframAlphaNotebook.nb with any text editor you like, search for TraditionalForm, and you'll see the following segment: DefaultNewCellStyle->"NaturalLanguageInput", ...


Top 50 recent answers are included