# Tag Info

## Hot answers tagged notebooks

18

Unfortunately I cannot claim the original discovery, but there are additional CodeAssistOptions in M10, the one you want is: SetOptions[EvaluationNotebook[], CodeAssistOptions -> {"FloatingElementEnable" -> False}] You could replace EvaluationNotebook[] with $FrontEnd but I prefer not to change$FrontEnd options.

9

The following functions will load the expressions and erroneous cells from a notebook: notebookExpressions[path_, pattern_:_] := Cases[Import[path, "Notebook"] // First , c:Cell[_, "Input"|"Output"|"Print", ___] :> Module[{v = eval[c]}, v /; MatchQ[v, _$Failed | Hold[pattern]]] , Infinity ] eval[cell_] := Quiet @ Check[ ... 7 Go through the following steps and it will work. Edit->Preferences->Advanced->OpenOptionInspector And Lookup "ClosingAutoSave" and change ClosingAutoSave from False to True. If you have any other tweaks you would like to perform, ask away! EDIT:: I have tried this for Mathematica 10 and it is working. What this does is automatically save the notebook on ... 7 For what it's worth, the accepted answer does not function in the Raspberry Pi version of Mathematica. A slight change gets you the result: SetOptions[EvaluationNotebook[],"ShowCodeAssist"->False] This is particularly helpful on the RPi since the code assist links attempt to find the nonexistent documentation. [The RPi does not ship with ... 6 Options[$FrontEnd, AutoOpenNotebooks] or CurrentValue[$FrontEnd, AutoOpenNotebooks] 6 I believe this is the documentation you are looking for: String Representation of Boxes Notably: And: 5 To input lists, use Ctrl+, which creates two place holders like so: You can move between them with Tab (forward) and Shift+Tab (backward), but not after you've entered a value. You can create a new column/element with Ctrl+, again and a new row with Ctrl+Enter. You can use this form anywhere you need a list/matrix: Documentation: Entering Tables ... 5 There's an option in Preferences > Interface that I think will fix this for you. 5 To make the offset from the top left corner of the screen 10 down and 100 to the right, do this: CreateDocument[{}, WindowSize -> {100, 100}, WindowMargins -> {{100, Automatic}, {Automatic, 10}}] 4 If you want Mathematica to indent your code, then there is no complete way around it. You can of course turn indentation completely off and then there would be not shuffling anymore, but the automatic indentation is generally a good thing and you should not consider this way. There is something you can do to minimize this shuffling, but you have to change ... 4 I think this is a bug rather than a feature. One way to accomplish this that will work in some scenarios without making a copy of the image is to use the crop tool, save the image and then undo the cropping thus restoring the original image. 3 For the aid of anyone else who runs into this issue I seem to have figured out the compounding factors necessary to recreate this problem. Create a Windows directory C:\foo\bar Save arbitrary Notebook example.nb to this directory Using the Option Inspector add to NotebookPath exactly: "C:\\foo\\bar" Close and restart Mathematica Create a new Notebook and ... 3 Another quick(?) and dirty way: Let nb be the notebook to be printed. E.g., execute nb = EvaluationNotebook[] in the notebook you would like. Then execute NotebookPrint[NotebookGet@nb /. CellGroupData[data_, Closed] :> CellGroupData[data, Open]] or Export["/tmp/foo.pdf", NotebookGet@nb /. CellGroupData[data_, Closed] :> CellGroupData[data, ... 3 These are Operator Input Forms Characters that are not letters, letter‐like forms, or structural elements are treated by the Wolfram Language as operators. The Wolfram Language has built‐in rules for interpreting all operators. The functions to which these operators correspond may or may not, however, have built‐in evaluation or other rules. ... ... 2 Something like this? This seems to be controlled by WindowElements nb = CreateDocument[ TextCell[StringJoin[Table["abcd ", {50}]], "Text", PageWidth -> 1200], WindowElements -> {}]; 2 For OSX you can do the following. Select Mathematica. Click on "Mathematica" menu then "Services -> Services Preferences..." Select "Shortcuts" tab. In the left side select "App Shortcuts". Click the + button. Fill out the following. Click add after you have set your short cut key and you are good to go. 2 It took me a while to figure this stuff out as well. First, it's important to understand the difference between a Cell expression and a CellObject. A Cell is the low-level representation of a cell inside a Mathematica notebook. So basically it's just an expression wrapped with Cell, and in that sense it is no different than any other expression. A ... 2 Too long for a comment, please tell me if this is what you need. Evaluate it in a cell you want: SetOptions[EvaluationCell[], CellTags -> "target"] and then later you can do: NotebookWrite[ Cells[CellTags -> "target"][[ 1]], Cell[BoxData[RowBox[{"mysteryVar = 0"}]], "Input", CellTags -> "target"] ] so that first cell was replaced. I've ... 2 Rasterizing is a possibility: data = Notebook[{Cell[ BoxData[ToBoxes[ Rasterize[ Grid[{{11, 22}, {33, 44}}, Frame -> All, FrameStyle -> Directive[AbsoluteThickness[1], Orange]], ImageResolution -> 400](*end of Grid*)]]](*end of Cell*)}]; Export[FileNameJoin[{$TemporaryDirectory, "grid.pdf"}], data]; ...

2

V10 has the option to have the program quit after the last window closes. Initially, you are prompted for your choice of the appropriate action after the last window closes: If you check the checkbox at the bottom right the default action will be to quit and the dialog box won't be shown again. I presume you must have clicked it at some time. As pointed ...

1

I classify your question as "Serious" thus, here is my answer. In many cases I have found myself in situations where a "canonical solution" does not seem to exist for a given problem found while creating Mathematica solutions. In those cases I tend to create a reasonable enough solution. When I read your question I remembered that a couple of years ago I ...

1

This is just a warning, not an error. You can go to Edit->Preferences->System and include your trusted notebooks in the "Edit Trusted Directories...".

1

It seems that the described method does work in v.10.0.0 if the image is represented as Graphics object. To convert Image to Graphics one can use Show. The reason why Graphics works is that the soft crop explicitly sets new PlotRange what can be seen by applying Options to the cropped image. But in the case of Image the PlotRange option exists only inside ...

1

You need to change the value of the option CellLabelAutoDelete to False. This can be done at the Cell, Notebook, or Global level. This can be done using Format > Option Insepctor... or SetOptions. For one Notebook: SetOptions[EvaluationNotebook[], CellLabelAutoDelete -> False] Globally (overridden by Notebook options): SetOptions[\$FrontEnd, ...

1

It seems like OutputForm always is the first output one gets and all previous Out[..] are removed if they are equal. Here equal means that Out[1]==Out[2], and not necessarily that Out[1]/TeXForm==Out[2]/OutputForm. You can change the order to: eq = D[y[x], x] + a*y[x] - b*Sin[c*x]; sol = DSolve[eq == 0, y[x], x]; OutputForm[TeXForm[sol]] TeXForm[sol] ...

Only top voted, non community-wiki answers of a minimum length are eligible