DataFits.m

(* ::Package:: *)

(************************************************************************)
(* This file was generated automatically by the Mathematica front end.  *)
(* It contains Initialization cells from a Notebook file, which         *)
(* typically will have the same name as this file except ending in      *)
(* ".nb" instead of ".m".                                               *)
(*                                                                      *)
(* This file is intended to be loaded into the Mathematica kernel using *)
(* the package loading commands Get or Needs.  Doing so is equivalent   *)
(* to using the Evaluate Initialization Cells menu command in the front *)
(* end.                                                                 *)
(*                                                                      *)
(* DO NOT EDIT THIS FILE.  This entire file is regenerated              *)
(* automatically each time the parent Notebook file is saved in the     *)
(* Mathematica front end.  Any changes you make to this file will be    *)
(* overwritten.                                                         *)
(************************************************************************)



(* ::Code::Initialization:: *)
BeginPackage["DataFits`",{"NRLists`","ErrorBarPlots`"}];


(* ::Code::Initialization:: *)
\[Eta]::usage="\[Eta] for local usage";
S::usage="S for local usage";
\[Chi]1::usage="\[Chi]1 for local usage";
\[Chi]2::usage="\[Chi]2 for local usage";
\[Delta]\[Chi]::usage="\[Delta]\[Chi] for local usage";

a0::usage="a0 for local usage";
a1::usage="a1 for local usage";
a2::usage="a2 for local usage";

sTot::usage="";
sTot3::usage="";
\[Chi]Tot::usage="";

\[Chi]diffplus::usage="";
\[Chi]diffstan::usage="";

DataFitFunction::usage="DataFitFunction[data_?ListQ,ansatzList_?ListQ,OptionsPattern[]]";

DataFitFunctionAll::usage="DataFitFunctionAll[dataraw_?ListQ,OptionsPattern[]]";
DataFitFunctionAllNoWeights::usage="DataFitFunctionAllWeights[dataraw_?ListQ,OptionsPattern[]]";

AnsatzRestrictions::usage="AnsatzRestrictions[nsfit_, q1fit_, ansatzGen_]";

Plot2DFits::usage="Plot2DFits[data_?ListQ,fitlist_?ListQ,fitvars_?ListQ, OptionsPattern[]]";
myListPlot3D::usage="myListPlot3D[data_?ListQ,options]: Plot 3d data +  interpolated function";
ColorGradient::usage="ColorGradient[data,colors,options]. Create a linear gradient of colors for the data";
CreateColors::usage="CreateColors[codes,colors]. Set different colors for each NR code";

CleanAnsatzParams::usage="cleanAnsatzParams[paramsGuess_, vars_]";

Generate1DPolynomialAnsatz::usage="Generate1DPolynomialAnsatz[CoefficientPrefixString_?StringQ,variable_,MinOrder_?IntegerQ,MaxOrder_?IntegerQ] creates a polynomial function ansatz.";

Residuals::usage="Residuals[data_,fit_,vars_] computes fit residuals.";
AtomsList::usage="Take the coefficients out";

GeneralizeFunction::usage="GeneralizeFunction[expr_,x_] insert free coefficient at all (non-exact) real numbers in a function";
GeneralizeFunction::usage="GeneralizeFunction[expr_,x_,coord_,orderNum,orderDenom_] insert polynomial with free coefficients at all (non-exact) real numbers in a function";

ExactPade::usage="ExactPade[ansatz_,coeffRules_,padeOptions_] get Pade approximant while keeping exact coefficients fixed.";
Generate1DPadeAnsatzList::usage="Generate1DPadeAnsatzList[ansatz_,\!\(\*
StyleBox[\"coeffRules_\", \"Code\"]\)\!\(\*
StyleBox[\",\", \"Code\"]\)\!\(\*
StyleBox[\"variable_\", \"Code\"]\)\!\(\*