Mathematica

FindRoot and Bose-Einstein distribution
Hello, I have two functions and two values: Clear[p, q, k, mm, mn] n[p_, q_] := Sum[k/(Exp[p + k q ] - 1), {k, 1, 10000}] m[p_, q_] := Sum[1/(Exp[p + k q ] - 1), {k, 1, Infinity}] mm = 0.501 mn = 41.0959 The first two equations are the Bose-Einstein distribution. Given mm and mn, find p and q. A first estimati... 10 Nov 2007 08:44

ReplaceAll behavour
I do not understand what Mathematica 6 is doing here: a=5 a/.a->3 gives 3 But... a+2/. a->3 gives 7 Why is that? Thank you for your help ... 14 Oct 2007 04:19

Remote kernel only works with "raw mathlink connection" selected
I am having trouble using a remote kernel on a linux machine from my Windows XP frontend. I have two Linux machines on which I can run a remote kernel. One runs "Mathematica 6.0 for Linux x86 (64-bit)", one runs "Mathematica 6.0 for Linux x86 (32-bit)". I have no trouble getting the remote kernel to run on th... 30 Sep 2007 04:15

Strange behaviour (bug?) in Mathematica 6
Evaluating the following three statements with a fresh kernel, in this exact order, results in an error message in Mathematica 6.0 (not in 5.2). In[1]:= Limit[1/x, x -> Infinity] Out[1]= 0 In[2]:= Exp[Sqrt[x]] + O[x]^2 Out[2]= 1+Sqrt[x]+x/2+x^(3/2)/6+O[x]^2 In[3]:= Sum[x^n/n!, {n, 0, Infinity}] During eva... 2 Oct 2007 05:55

NautyTools`NautyTools
Does anyone know where to get this package? It comes up missing when I try to execute http://mathworld.wolfram.com/notebooks/GraphTheory/Vertex-TransitiveGraph.nb and I don't see it in the Mathworld packages zip, http://library.wolfram.com/infocenter/MathSource/4775/ Get::noopen: Cannot open NautyTools`NautyTool... 12 Sep 2007 03:56

Question re: graphics primitives
Is it possible to put conditional clauses (i.e. If[.]) in the VertexRenderingFunction option for TreeForm (or any primitive that this option applies to)? I wanted to selectively label vertices based on label content, but Mathematica was complaining that "If" is not a graphics primitive or directive. (Basi... 15 Jun 2007 05:39

JLink error on startup
To all, I experience the following error on startup of Mathematica: JLink`InstallJava::fail: A link to the Java runtime could not be established. Then the system appears to work as normal. I am using version 6.0 (student) on Windows XP. I could not find any documentation for this failure. Can anyone of... 7 Jun 2007 04:38

How to add legend to ListLinePlot?
Hi, ListLinePlot[{a, b}, PlotStyle -> {RGBColor[1, 0, 0], RGBColor[0, 0, 1]}, Epilog -> Legend[{{RGBColor[1, 0, 0], Style["a", "Section"]}, {RGBColor[0, 0, 1], Style["b", "Section"]}}, LegendPosition -> {7, 0.8}, LegendSize -> {2, 1}, LegendTextSpace -> 0.5] , PlotRange -> All ] ?? it... 24 May 2007 06:59

Mathematica 6.0 - Legend
Hello, I want to create a Legend on a ListLinePlot I made. I have 4 data groups I plot on one graph and I want to identify each one by its colour and a name. I read about the Legend Package, but it seems, if I understand correctly, to work only with Plot like graphs. I do not understand why it is so di... 16 May 2007 06:14

Map vs. Table
Dear Group, consider a set of data (y values): data = Table[i*j, {i, 5}, {j, 10}] I want to label each Integer with an x value: label := Table[{i, #} & /@ data[[i]], {i, Length[data]}] I've understand that list creation is much faster with Map than with Table. Is there an effective way to convert the T... 1 May 2007 03:48