User Portlet User Portlet

Discussions
I'll add that it worked the day before.
My mistake! The problem is only in the PlotRange parameter. In former version of Mathematica, teh full region was visible vithout explicit PlotRange specification, now it is necessary to specify propper PlotRange. Thanks!
Sometimes it is faster, sometimes slower: In[5]:= Table[((PlanetData["Mars", Dated["HelioCoordinates", Today + (Tomorrow - Today) #]] & /@ Range[7]) // Timing)[[1]], 20] Out[5]= {6.42188, 7.875, 8.78125,...
Patrik & Marco - thank you very much!
Thank you, Sean. It was my mistake, I tried *Assuming[ci >0* and also *Assuming[ci
Yes, it looks so. I can use it in the manipulate command - its OK. I can sipmly write In[6]:= krit[0.5, 0.3, f, X, Fexp] Out[6]= 2.39701 ...it works. I can draw a Plot3d od krit as a function of k and t -- it also works... ...
Here i s part of my code. I am looking for a minimal value of a function *krit* (with a given parameter Fexp). The output from the StepMonitor says, that *NMinimize* found a value 87.985 of the function *krit*, but the result of the *NMinimize*...
Thank you!
Please, how to draw in Mathematica 10 an circular arc with an arrowhead at the end?
Colleagues, please - it is a difference betwen theese defintifions? It seems to me, that tey are equivalent -- it is true? In[1]:= f1[a_, b_] := a[b]*a[2 b] In[2]:= f2[a_][b_] := a[b]*a[2 b] In[3]:= f3[a_[b_]] := a[b]*a[2 b] ...