User Portlet
Featured Contributor
| Discussions |
|---|
| Pedantically speaking, you want the following (note that Sin[x]/x really has a discontinuity at x=0, but Sinc[x] doesn't): Integrate[Sinc[x]^2, {x, -Infinity, Infinity}] (* Pi *)This also works, but technically it's not the same:... |
| Seems like a bug to me. Sum[Floor[2^-p], {p, 0, Infinity}] (* 0 *) Sum[Floor[2^-p], {p, #, Infinity}] & /@ {-1, 0, 1} (* {3, 0, 0} *) Strangely enough, this works: [mcode]Sum[Floor[2^-p], {p, {-1, 0, 1}, Infinity}] (* {3, 1, 0}... |
| Dollar-prefix as a convention to mark constants is a new thing to me; good to know. |
| I suggest trying the following: [mcode]a = 1.36; b = .003183; R = .0820578; T = 333; Chop[Array[FindRoot[vi - ((((2.9 + #) + (a/vi^2)) (vi - b) - (R T))/((2.9 + #) - (a/vi^2) + (2 a b/vi^3))) == 0, {vi, 4 + I}] &, 56]] (* {{vi -> 0}, {vi ->... |
| It might be worth mentioning that ImageKeypoints provided by Mathematica uses a SURF ( http://en.wikipedia.org/wiki/SURF ) detector to find keypoints. SURF is development partially based on SIFT, which... |
| Abs[x] is the absolute value function, that is |x|. |
| This is my try:[mcode]createFileHandle[filename_] := {filename, 0}; readNewLines[{filename_, pos_}] := Module[{f, str}, f = OpenRead[filename]; SetStreamPosition[f, pos]; str = StringCases[StringJoin@ReadList[f, Character],... |
| I just tried, and was able to perform more than three (five or something) step-by-step queries in a row. This option is available through == WolframAlpha connection. I have no idea about WRI policy on this. |
| @MohamedZaghloul: you can export per-frame data in the following way, in this case 100 frames: [mcode]n = 1000; r := RandomInteger[{1, n}]; f := (#/(.01 + Sqrt[#.#])) & /@ (x[[#]] - x) &; s := With[{r1 = r}, p[[r1]] = r; q[[r1]] = r]; x =... |
| You probably want to check out ImageFeatureTrack ( http://reference.wolfram.com/mathematica/ref/ImageFeatureTrack.html ) and its friend, ImageCorrespondingPoints... |