Reputation
8,898
Top tag
Next privilege 10,000 Rep.
Access moderator tools
Badges
2 15 51
Newest
 Enlightened
Impact
~127k people reached

Aug
20
comment Web Browsing Automation with Mathematica
@ArnoudBuzing Are there any new functionalities added in the new version?
Aug
4
comment Maximizing a 3-variable function
You had a typo! Twice the constraint on x. By the way Maximize[{(a*x^2 + b*y^2), 0 <= x <= a, 0 <= y <= b, 1 < a, 1 < b}, {x, y}] prints $a^3+b^3$ and the other unbounded solutions too. Now for your original problem symbolic calculation becomes probably too involved to give closed form bounds in terms of {m,n,t}. Not sure if one can hack a solution in closed form here without any extra info on those constants.
Aug
3
comment Maximizing a 3-variable function
You have to provide some values for {m,n,t} or give some constraints. You can use Block to do that for example. Block[{m = 132, n = 10, t = 22}, NMaximize[{f[x, y, z], 0 <= x <= Min[t, z], 0 <= y <= m - z + x, 0 <= z <= n}, {x, y, z}]] gives me {5161., {x -> 10., y -> 61., z -> 10.}} if I use numerical version of Maximize.
Jul
28
comment solving non-linear set of equations using NSolve in order to get all roots
Here goes a numerical solution for you {phip -> -1.2873402582429818, t -> 414.62463948474345}. As far as I can see there is no real root for t<0. Also using Plot3D I doubt if there is any solution to {S1==0, S2==0} for t>0 and phip>1. Function is also unbounded in that region.
Jul
24
comment Using Compiled Function in Implicit Region
If you are unhappy with the warning message try this cf = Compile[{{x, _Real}, {y, _Real}, {z, _Real}}, -x y z]; TEST[x_?NumericQ, y_?NumericQ, z_?NumericQ] := cf[x, y, z]; RegionPlot3D[ ImplicitRegion[ TEST[x, y, z] > 0, {{x, -5, 5}, {y, -5, 5}, {z, -5, 5}}]]
Jul
23
comment Solving an NODE in series
You have two answers here as well as some informative comments. mathematica.stackexchange.com/questions/25363/…
Jul
23
comment CompilationTarget to C takes long compilation time
With Windows 8.1 and Visual Studio 2013 I am also getting 2 sec for f2. I guess its machine specific compiler issue.
Jul
3
comment Cluster numbers into n partitions so that each partitions sum is closest to total/n
Ya that might be the case @LLlAMnYP
Jun
29
comment How can I smooth a 3D surface generated by RegionBoundary?
Its here mathematica.stackexchange.com/questions/86196/…
Mar
20
comment Monotone, periodic 1d-interpolation with continuous 1st order derivative
Thx! @b.gatessucks edited..
Jan
28
comment Using the string Match with options!
Try this Select[s, StringMatchQ[#, ___ ~~ "red" ~~ ___] &]!!
Jan
28
comment Selecting values over lists for discrete inputs in NDSolve
I guess Controller[t_?NumericQ]:=.. should solve the issue!
Jan
13
comment What is the largest system of PDE you have solved with Mathematica?
I will suggest that you show us the system of PDEs for say two molecules. Provide us the formulation for the general case of n molecules. I guess then with a small example system being presented in your question suggestions here will be more fruitful to you.
Jan
6
comment Web Browsing Automation with Mathematica
@Arnoud Buzing Can you provide a minimal example of how to use Execute[] to run some javascript? I can find this function in the WebUnit source code. There is no documentation so I am asking you here.
Nov
7
comment BSpline or other curve through arbitrary ordered sequence of two-dimensional points
This two links can help you mathematica.stackexchange.com/questions/26893/… and mathematica.stackexchange.com/questions/60619/…
Oct
24
comment graph of the Cantor set in Mathematica
Check here demonstrations.wolfram.com/CantorSet
Oct
10
comment what to do when NSolve does not solve
After observing the plot you can numerically solve the equation using FindRoot[f[x] == 0, {x, #}] & /@ {-0, 6} in this case. Also look at the interesting answers here mathematica.stackexchange.com/questions/5663/…
Sep
30
comment How to build a bvh (a motion capture file format) player in Mathematica?
Great job (+1)! However in section example result using parseBrackets@parse@tokenize@bvhHierarchy /. expr -> Sequence /. parseBrackets[a : ___] -> a I do not get a list like yours but something inside a Sequence. I guess there is some typo in the code u pasted. In its current form using the above code I cant reproduce your results in V9 or V10.
Sep
17
comment Mathematica 10 Graph issue
@SjoerdC.deVries Not a good news for us then :( Hope some other buggy things are repaired, that came along with the long awaited V 10.
Aug
27
comment Fredholm integral equation of the second kind with kernel containing Bessel and Struve functions
Sorry! I do not know answer to your symbolic parameter question. I used Plot3D[Kpart[s, t],{s,-1,1},{t,-1,1},PlotPoints-> 40] to plot the kernel.