Tag Info

New answers tagged

0

Sometimes, if analytic interpolations are required, the Discrete Cosine or Discrete Sine transforms may be useful. FourierDCT help page shows an example which I reformulate slightly: data = {{xi,yi}...} with xi equispaced in the interval [0,1] n = Length[data]; cc = FourierDCT[fg, 3]/Sqrt[n]; (* 3 is a type of transform *) interp = ...


3

I can think of two approaches if all you have are function values, (1) fitting a smooth a model to your data, and (2) estimating the derivatives using finite differences and incorporating those estimates in an interpolating function. The first requires some insight into potential target models, about which none has been given. So I'll show the second ...


1

To illustrate the point made in my recent comment, gpap is correct that f = Interpolation[Table[{x, Sin@x}, {x, 0, 2 Pi, 2 Pi/100}], InterpolationOrder -> 2]; g[x_] := f''[x]/f[x]; Plot[{f[x], g[x]}, {x, 0, 2 Pi}] does not give a well behaved expression for g[x]. However, using f = Interpolation[Table[{x, Sin@x}, {x, 0, 2 Pi, 2 Pi/100}], ...


4

Evaluate the integral once and for all (cf. cdfc): cdfc[k_] = Integrate[PDF[NormalDistribution[0, 1], y], {y, k, Infinity}]; TCJS[T_, k_] := A/T + c1[T]*d1*T + h1*((d1*T)/2 + k*σ1*Sqrt[T + 1]) + (b1/T)*σ1* Sqrt[T + L1]*(PDF[NormalDistribution[0, 1], k] - k*cdfc[k]); EQ1[T_] := (k*σ1*h1)/(2*Sqrt[T + L1]) - ((b1*σ1)/ ...


1

You can use GridBoxOptions and set GridBoxAlignment via the Options Inspector. (See also tutorial/OptionsForExpressionInputAndOutput -- documentation is scarce.) To set all items to be aligned left, GridBoxAlignment should be set to GridBoxAlignment -> {"Columns" -> {{Left}}} (Enter {"Columns" -> {{Left}}} in Value column for the option ...


0

In V10, there is now the function Subdivide, which specifies the number of intervals (which equals one less than the number of points) into which a range is to be divided. The OP's example sine plot may be done as follows: Table[Sin[x], {x, Subdivide[0.2, Pi^2, 100 - 1]}] // ListPlot


1

It is just ListPlot[Flatten[data], Joined -> True, PlotStyle -> {Black, Dashed}, PlotRange -> All, DataRange -> {0, 1000}, Frame -> True, FrameLabel -> {"Zone", "Force"}] EDIT: Oh like it was mentioned in the comments. :)


4

ctrl-, (comma) adds a new column at the column where you insertion point cursor is located. ctrl-return adds a row there. Just make sure you have the insertion point cursor (vertical blinking bar) visible in the matrix and you do not have selected anything.



Top 50 recent answers are included