Skip to main content

notebooks - my Mathematica has turned orange and not able to find out why


I do not know what happened. But when I rebooted my PC, now Mathematica comes up orange colored. I shut down the PC and tried again, it is still orange. Here is screen shot:



Mathematica graphics


I also did a reset. Holding down the ctrl-shift key. And it is still orange colored


Mathematica graphics


I also deleted C:\Users\\AppData\Roaming\Mathematica and started, and it is still orange.


All pop-ups and help now is also orange


Mathematica graphics


Also the little + thing on the start of the cell is orange:


enter image description here


I am not expecting someone to just know the cause of this, but may be someone else had this problem and can suggest what to do.


Windows 7 did large update on my PC last night, so it might have something to do with it, not sure. Here is the list of the updates



enter image description here


I did not do anything to Mathematica itself or change anything configuration with it. I just turned orange. No other app I am using has turned orange as well.


specs: Version 10.1, 64 bits, windows 7, 64 bits.



Update


I found something interesting: When I take image of the cell using SEUploader, then it comes up in the image with orange background. While in the notebook itself, it is still white. So SEPloader is picking up the orange color from somewhere. Here is screen shot:


enter image description here


Maybe the above will give a clue to the problem.


per request below, here is the color setting on my PC. I never touch this stuff as I do not understand colors.


enter image description here



But I turned the option above to "use NVIDIA setting" from the "Other applications control color settings" and restarted Mathematica, and it is still orange.


Added result of


FileNames["C:\\Program Files\\Wolfram \
Research\\Mathematica\\10.1\\SystemFiles\\Data\\ICC\\*"]

Mathematica graphics



Answer



In either the Display or the Color Management control panel navigate to the calibration option and change some settings and revert back. Click Apply to see if it helps.



Pasted from question:



Problem resolved. Thanks to suggestion by SjoerdC.deVries in comments. I run the windows color calibration and clicked apply, then restarted Mathematica, and now the orange color has gone:


Mathematica graphics


It looks like the windows 7 monitor updates caused Mathematica to get little confused. Running windows control panel->Calibrate color->Apply fixed whatever the problem was. Here is the button to click on:


Mathematica graphics


Comments

Post a Comment

Popular posts from this blog

plotting - How to draw lines between specified dots on ListPlot?

I would like to create a plot where I have unconnected dots and some connected. So far, I have figured out how to draw the dots. My code is the following: ListPlot[{{1, 1}, {2, 2}, {3, 3}, {4, 4}, {1, 4}, {2, 5}, {3, 6}, {4, 7}, {1, 7}, {2, 8}, {3, 9}, {4, 10}, {1, 10}, {2, 11}, {3, 12}, {4,13}, {2.5, 7}}, Ticks -> {{1, 2, 3, 4}, None}, AxesStyle -> Thin, TicksStyle -> Directive[Black, Bold, 12], Mesh -> Full] I have thought using ListLinePlot command, but I don't know how to specify to the command to draw only selected lines between the dots. Do have any suggestions/hints on how to do that? Thank you. Answer One possibility would be to use Epilog with Line : ListPlot[ {{1, 1}, {2, 2}, {3, 3}, {4, 4}, {1, 4}, {2, 5}, {3, 6}, {4, 7}, {1, 7}, {2, 8}, {3, 9}, {4, 10}, {1, 10}, {2, 11}, {3, 12}, {4, 13}, {2.5, 7}}, Ticks -> {{1, 2, 3, 4}, None}, AxesStyle -> Thin, TicksStyle -> Directive[Black, Bold, 12], Mesh -> Full, Epilog -> { Line[ ...
Post a Comment
Read more

equation solving - Invert and fit implicitly defined curve

I need to fit an implicitly defined curve. I thought I could get some data out of Solve , and then using FindFit . Therefore, I would like to find the relation the parametric curve defined by $F(x,y)=0$: Solve[-(1/2) + 1/2 (0.41202 BesselK[0, 0.1 Sqrt[x^2 + y^2]] + (0.101483 x BesselK[1, 0.1 Sqrt[x^2 + y^2]])/Sqrt[x^2 + y^2]) == 0, y] But I can't get an output: Solve was unable to solve the system with inexact coefficients or the system obtained by direct rationalization of inexact numbers present in the system. Since many of the methods used by Solve require exact input, providing Solve with an exact version of the system may help. >> Edit: In particular, I would like to fit the data coming from the curve with the expression of another curve, and not with a function $f(x)$. In particular, since this clearly looks like a cardioid , I would like it to fit to something like it. What other strategies could I try?
Post a Comment
Read more

dynamic - How can I make a clickable ArrayPlot that returns input?

I would like to create a dynamic ArrayPlot so that the rectangles, when clicked, provide the input. Can I use ArrayPlot for this? Or is there something else I should have to use? Answer ArrayPlot is much more than just a simple array like Grid : it represents a ranged 2D dataset, and its visualization can be finetuned by options like DataReversed and DataRange . These features make it quite complicated to reproduce the same layout and order with Grid . Here I offer AnnotatedArrayPlot which comes in handy when your dataset is more than just a flat 2D array. The dynamic interface allows highlighting individual cells and possibly interacting with them. AnnotatedArrayPlot works the same way as ArrayPlot and accepts the same options plus Enabled , HighlightCoordinates , HighlightStyle and HighlightElementFunction . data = {{Missing["HasSomeMoreData"], GrayLevel[ 1], {RGBColor[0, 1, 1], RGBColor[0, 0, 1], GrayLevel[1]}, RGBColor[0, 1, 0]}, {GrayLevel[0], GrayLevel...
Post a Comment
Read more