Mathematica

How to get the output of FindFit from MathLink in
���� �: Hi, all, I want to write a C program that calls MathLink to use "FindFit" in Mathematica. The output of "FindFit" is a list of rules. How can I get those packets? Thanks for help! Best regards, DONG Li Hi guys, Finally, I have worked out this problem. Summarized as foll... 24 Nov 2009 06:40

Mathematica 7.0 - Wrong Documentation on StudentTCI
Hi all, Summary: StudentTCI function's second parameter expects standard error, rather than standard deviation as stated in the document. The document has an error. I just want to report an error in the documentation of StudentTCI function in Mathematica 7.0. The document for StudentTCI function reads Stud... 21 Nov 2009 03:48

Setting global InputAutoReplacements
Dear Mathgroup, I am trying to create a few custom InputAutoReplacements that would apply to all input cells by default. I am trying to follow John Fultz's instructions on http://forums.wolfram.com/mathgroup/archive/2000/Oct/msg00157.html, but running into difficulties: the style for the input cell seems to be... 29 Nov 2009 05:49

More Efficient Method
I have a couple of functions designed to poke a single hole, and to poke multiple holes, in a one-level list: We define a function which, given the imported pressure data, finds the subset of that pressure data excluding the pressure data points between "targetL " and "targetU". In[5]:= findsubset[data_?Vector... 24 Nov 2009 06:40

Filling in ListPlot
All I'm having problems with Filling in ListPlot. I have two curves and would like different colors as one curve goes above the other, here goes the code; aris = {10000, 5000, 1000, 500, 100, 50, 20}; y = 10000; elist = Flatten[ConstantArray[#, IntegerPart[y/#]] & /@ aris]; n = 1; ariList = Reverse[{N[y/... 20 Nov 2009 07:50

mixed ByteOrdering
I have some binary files with mixed ByteOrdering. The actual data is little endian but the metadata in the header is big endian. Is there a clever way to swap the bytes in a short integer? My first shot looks rather ugly: swapBytes[b_] := BitOr[BitShiftLeft[BitAnd[255, b] 1, 8], BitShiftRight[b, 8]] Cheers ... 12 Nov 2009 07:17

Importing Excel File into mathematica
Hi! I'm trying to import a small table (2 columns and 15 lines) into mathematica, but for some reason I'm not able to do it... Here's the code Im trying: In[1]:= Path1 = "C:\\Documents and Settings\\Ankit\\Desktop\\Book1.xlsx"; Import[Path1, "Elements"] Out[2]= {"FileNames"} In[5]:= Import[Path1] Out[5... 13 Nov 2009 06:36

NonlinearModelFit on correlated data
Hello. I want to perform a nonlinear model fitting on data points with some significant correlations in them. For these correlated data points, the definition of chi^2 is chi^2=Sum_i Sum_j [ y_i - f(y_i) ] * [ y_j - f(y_j) ] / Covariance(y_i, y_j) . Currently, I am using the Mathematica function "Nonlinea... 13 Nov 2009 06:36

kernel crash with integrating the derivative of an
Hi Sjoerd, I do confirm the crash (M7.0, WinXp 32). The following seems to help: redefine your function to guard against non-numerical arguments as In[1] := Clear[sp1,x]; sp1[x_?NumericQ] = D[sp[x], x]; In[2]:= NIntegrate[sp1[x], {x, -9, 4}] Out[2]= 12.5726 Regards, Leonid On Wed, Nov 11, 200... 12 Nov 2009 06:11

Formatting Numeric Outpuit
Please consider these Mathematica 7 code Input lines: n1 = RandomReal[100, 10] n2 = NumberForm[n1, {3, 3}] Column[n2, Right] What I expected to get was "ignored", namely right aligned "arbitrary" numeric data with 3 digits to the right, and 3 digits to the left of the decimal point) formatted in a single ... 13 Nov 2009 06:36