Tag Info

New answers tagged

0

OK, based on the feedback provided I have created a solution to the problem. For the benefit of the community I'm posting this solution as an answer to my own question as your feedback, although very useful, missed some key elements. Note that the variable mySizeAdjustments will most probably need to be adjusted by users depending on the operating system ...


4

This answer, which is a slight modification of my answer to a previous question, takes you most of the way there: Clear@notebookScreenshot notebookScreenshot[nb_] := Module[{left, top, size, opts = AbsoluteOptions@nb}, {left, top} = WindowMargins /. opts // Diagonal; size = WindowSize /. opts; Needs["GUIKit`"]; ...


1

This isn't exactly a screenshot but maybe it meets your needs? doc = CreateDocument[{ TextCell["Need help", "Section"], Cell[1/0], TextCell["Can you help?"]}, WindowTitle -> "MyNotebook"]; Rasterize@doc


0

One solution is use a snapshot software. I like very much hypersnap , you can test in http://www.hyperionics.com/ with wich you can scroll down an obtain any similar to this http://sensa.square7.ch/snap01417.jpg The other option, with Mathematica, to obtain the Out line is...


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 ...


4

To give you a first idea: Try this button, which uses all currently selected cells in the selected notebook, copies them into a new document and evaluates everything Button["Test Selected Cells", NotebookEvaluate[CreateDocument[NotebookRead[SelectedNotebook[]]], InsertResults -> True], Method -> "Queued"] You can use this to create a new palette ...


1

I'm on 10.0 for Mac OS X x86 (64-bit) (June 29, 2014) and and have the following observed: highlighting the Output-Cell and using the Command "Save Selection As" leads to the following result; highlighting the Output and using the Command "Save Selection As" leads to the observed result; Wile CellPrint[ExpressionCell[CharacterRange["a", ...


1

With V10 on OS X, I get Might be a platform issue.


2

The quotes appear because the InputForm does not show them, while the OutputForm does. Programmatically, you can explicitly call OutputForm to avoid this: Export["quotes.png", OutputForm[CharacterRange["a", "z"]]] You can also go into Format > Option inspector… and look for ShowStringCharacters and using Save selection as…:


22

This problem is probably due to the MathematicaMono font which is introduced in v10. Defining the problem: Some fonts ("[","_","]","=", etc.) are rendered badly with strange thinning in v10 in some notebook magnifications. This is obvious when you compare the renderings from v10 with those from v9. Analyzing the problem: I found that all of these ...


5

I analyzed which fonts are loaded when starting Mma v10 compared to v9. The problem could be tracked down to the loading of the fonts in the Folder $InstallationDirectory\SystemFiles\Fonts\TrueType If you open Mathematica-Bold.ttf or MathematicaMono-Bold.ttf, you will see how ugly these are. To prevent loading these fonts one should make a backup copy of ...


5

I was having kind of the same problem. I didn't had an error dialog like you and for me, the issue appeared when I rotated 3d graphics. When I did this, after a second or two, the notebook window grayed out too, although when I released the mouse button, everything turned back to normal. This seems to be a common problem and has to do with the ...


2

Wireless keyboard/mouse adaptor may be a cause of a FE issue (there might be others I suppose). Removing it (at Wolfram's suggestion - credit for investigation so far) made MMA10 startup speed effectively normal & no "formatting notebook" popups were noted. Unfortunately I don't have a wired keyboard & mouse... [Setup i3, Win-7 pro 64-bit; all Acer ...


0

An alternative is to customize the file MenuSetup.tr that is in the same folder of KeyEventTranslations.tr. The difference is that there you can use KernelEvaluate to execute a NotebookDelete. Here is an example of a new menu item. Insert this code in the list of Menu into the MenuSetup.tr file and restart Mathematica. Menu["My commands", { ...


12

Based on Mr.Wizard's answer and Szabolc's comments to it, I now understand that the code I posted does have undesirable side-effects and it should be avoided. Specifically, the scoping constructs Module and Block are meant to completely localize the variables in their first argument (for more information see this question). However, placing their scoped ...


6

I believe that highlighting is there specifically to encourage you to use DynamicModule rather than Module: DynamicModule[{A = 1}, Manipulate[Plot[A Sin[k x], {x, 0, 20}], {k, 1, 10}]] One reference: http://forums.wolfram.com/mathgroup/archive/2011/Sep/msg00198.html Also related: Table function with Part[] call misbehaving, but only after initial ...


0

Under version 10 at least for the Delete All Output menuoption one doesn't have to hit Enter any more to make it effective. This is not a full answer but it certainly makes my life one keystroke easier. This now works without putting up a confirmation dialog: FrontEndExecute@FrontEndToken@"DeleteGeneratedCells" (Tested only under Win7 6-bit.)


14

This is not related to the output cell greying to indicate mismatch with the input cell. You can easily verify this by editing the input cell — it gets further greyed out. The new summarized display that is used for things like SparseArray, Interpolation, etc. has a setting "Interpretable" -> False. If this is the case, the output is showed in a gray ...


2

I was just working on something and here's a side effect. Nothing new but given in closed form as palette button: CreatePalette[ Button["Evaluate above", With[{NB = InputNotebook[]}, Do[ SelectionMove[Experimental`FromCellIndex[NB, i], All, Cell]; SelectionEvaluate[NB]; , {i, 1, Experimental`ToCellIndex @ SelectedCells[NB][[1]]}] ]]] ...


4

In version 10.0 of Mathematica the main menu bar is gone, just as you want it. And each window has its own menu bar.


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 ...


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.


2

Most likely you merely set to some $FrontEnd options unintentionally. If you can figure out what these options are you can reset them by clicking the X next to the field in the Option Inspector: You can also select as text rather than by category to see a list of all the options that have been changed from the default (manually or otherwise).


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

You can use SyntaxInformation. In this case, SyntaxInformation[Lim] = {"ArgumentsPattern" -> {_, _, OptionsPattern[]}, "LocalVariables" -> {"Limit", {2}}} does what you want.


6

This is a bug in Mathematica 10.0.0 and will be addressed in the first 10.0.x bug fix release (Mathematica 10.0.1). Thank you for reporting it and our apologies for any work lost because of this issue.


1

In Linux this still works: and even in the official documentation the shortcuts are still listed under Format Menu. This problem seems to be local to your machine.


7

For file operations two workarounds currently work: 1) Use slash / instead of double backslash in the paths to files under Windows: Import["D:/test/кириллическое название/файл.txt"] 2) Use FileNameJoin or StringJoin: Import[FileNameJoin[{"D:", "test", "кириллическое название", "файл.txt"}]] Import[StringJoin[{"D:", "\\", "test", "\\", "кириллическое ...


1

Dynamic is sometimes too aggressive for some purposes. You need to make sure Dynamic updates only when you are ready for new results. Besides, to ensure that Dynamic will have enough time to process your request it is sometimes a good idea to use SynchronousUpdating option. In the solotuion below you will see that instead of calculating the menu options ...


2

Clear["Global`*"] g[x_] := x^3 f1[x_] := g[x^2] f2[x_] := g[x^3] Definition@f1 f1[x_] := g[x^2] FullDefinition@f1 f1[x_] := g[x^2] g[x_] := x^3 Head@f1 Symbol Information["f*"] a[1] = 1; a[2] = 2; ?a DownValues@a UpValues@a


3

In Mathematica version 10, this now works on Mac OS X. For example, this rule is part of the system-supplied FontSubstitutions list: "Meridien" -> "Times" So when you type in the font name either incorrectly or if the system can't find a font with that name: Style["The quick brown fox", 80, FontFamily -> "Meridien"] you see the designated ...


3

Some front end troubles can be solved as described here: Troubleshooting On OS X holding down Shift-Command during startup will reset the caches. This is worth trying when the front end is misbehaving. When having multiple versions of Mathematica installed, some problems can be avoided by using separate configurations for the different front end ...


3

Use Remove aber = {1, 2, 3} Remove@aber


16

Mathematica still works with Courier by default. Nothing is broken about your copy of Mathematica. It is the case, however, that if you use any sans serif font (or at least any font that properly advertises itself as sans serif...many amateur font designers don't bother setting font metadata bits correctly), you'll see the new MathematicaSans font in use ...


5

Nothing is wrong with your settings. Mathematica 10 is supposed to be using the old fonts. The old fonts are shown in the blog post introducing Mathematica 10. Note: People report that the hack described below doesn't work on Windows or Linux. It works on OS X, where I tried it. But you can play with the new fonts if you like. Go to Format -> Edit ...


2

You can use MakeBoxes to format output pretty much however you like. This is what Mathematica does for InterpolatingFunction. You may be able to glean something by inspecting the output cell or from FormatValues[InterpolatingFunction]. Unlike InterpolatingFunction, I included an Interpretation, which means that the output in the notebook may be copied and ...


0

The info on Mathgroup by Darren Glosemeyer here wasn't exactly what I remembered but if you change this line: makeWrapper[data_List, var_Symbol, opts___] := myWrapper[data, var] to makeWrapper[data_List, var_Symbol, opts___] := myWrapper[Panel[data], var] you can see how to include panels in your own functions:


30

I implemented a multiple undo mechanism in v10. It's not as perfect as I would like it to be, yet, but it does a pretty decent job in my experience. And a few of the documented options for it got ahead of the implementation...think of some of that stuff as a "coming soon". Feel free to ping me on any problems you find with it.


5

You need to set CellLabelAutoDelete->False You can do this programmatically: SetOptions[EvaluationNotebook[],CellLabelAutoDelete->False] or set it in your stylesheet.



Top 50 recent answers are included