User Portlet
| Discussions |
|---|
| Hi. I think that to draw a tangent a curve your point has to actually be on the curve. I rewrote your function slightly. I used the following code to put a point inside the plot showing where the tangent line passes: ... |
| Noah, how did you do it? |
| Try something like this: list = RandomInteger[1, 10]; y[n_, list_] := Piecewise[{{list[[n]] - list[[n - 4]], n >= 5 && n Length[list]}}]; Map[y[#, list] &, Range[5, Length[list]]] Map[y[#, list] &, {5, 6, 7,... |
| I don't think the limit exists. If you plot the values the sequence alternates between an "upper" limit approaching e, and a lower limit approaching 1/e. See the attached code and plots `f[n_] := (1 + ((-1)^n)/n)^n; e[n_] := (1 + 1/n)^n ... |
| (*Generates table of hues from 0 to 1 in steps of 1/20*) Table[ Hue[x], {x, 0, 1, 1/20}] (*Blends yellow with each hue in table*) Table[ Blend[{Yellow, Hue[x]}], {x, 0, 1, 1/20}] (*Example code from blend... |
| I tried `NDSolve[{y'[x] - 3 x^2 + 2 x - 1 == 0, y[4] == 1}, y[x], x]` and also tried the same using DSolve in WolframAlpha. I don't think either are supported, so I just threw it in Mathematica and obtained the following (see attachment) |