Mathematica

How to lay out a grid of plots with frame labels, but no spaces
I want to show a several plots in a grid but only show tick labels and axes labels on the outermost edges of the grid (all plots on a given row or column have the same axis along their shared edge).Also there must not be any space between the plots. I can get the plots in a grid without gaps easily enough. here is ... 8 Mar 2010 07:28

manipulate plot
Its seems that you have to read more about scoping (in general and in Mathematica). Manipulate automatically generates a DynamicModule which is a scoping environment. Take a simpler example y = m x; (*here m and x are GLOBAL VARIABLES *) Module[{x =1, m=2},y](*here m and x are local variables having different... 18 Feb 2010 06:07

Define an antisymmetric function
I'd like to define an antisymmetric function by giving its value on a set of known objects. I'm having trouble enforcing antisymmetry. Say I want to define G[_, _] on the objects {a, b, c}: G[a, b] := f[a, b] G[a, c] := g[a, c] G[b, c] := h[b, c] If I now enforce antisymmetry simply by G[x_... 13 Feb 2010 06:02

How to scope PopupMenu values in a DynamicModule?
Why does this work: DynamicModule[{foo}, PopupMenu[Dynamic[foo], {bar, baz}]] but this doesn't: DynamicModule[{foo, bar, baz}, PopupMenu[Dynamic[foo], {bar, baz}]] ? In the second example, the PopupMenu display always looks blank. Are the two occurrences of bar and baz in different scopes or something? ... 13 Feb 2010 06:02

Rotating graphics problem
I have weird problem rotating even ordinary Plot3D output graphics. Sometimes it behave as it should - graphics rotate as I click and drag. But in most situations when I click an try to drag, graphics seems to zoom itself on large rate, so only a few or none grid lines is visible. There are no way to back to ... 12 Feb 2010 05:28

Mathematica usage in finance
As part of a project within Wolfram Research I am interested in hearing from Mathematica users from within the financial world, i.e. users of Mathematica in trading, derivatives, credit, fixed income, asset/portfolio management and so on. If you can spare some time could you please email me at mhoneychurch(a)wolfram.co... 11 Feb 2010 08:17

Clip[DirectedInfinity[1]] remains unevaluated?
Shouldn't Clip[Infinity] evaluate to 1? It remains unevaluated. I'm trying to think of a reason why 1 wouldn't always be the correct answer. Same with Clip[-Infinity], seems like it should be -1. ... 12 Feb 2010 05:28

Translating this algorithm into mathematica code
Dear all, I am kind of new to this forum and mathematica but I have found the post here quite interesting and helpful. I am having problem translating this algorithm to mathematica code and I hope I can be helped. The algorith is as given below. Thanks to you all. Suppose that for a given matrix A ( n x n ) th... 12 Feb 2010 05:28

ReplaceAll reloaded
Because the Or gets evaluated on the lhs of the rule. Use HoldPattern. x = Or[a, b]; x /. HoldPattern[Or[y__]] -> {y} {a, b} But notice: Or[y__] -> {y} y__ -> {y} David Park djmpark(a)comcast.net http://home.comcast.net/~djmpark/ From: Istv=E1n Zachar [mailto:zac(a)freemail.hu] Can you ple... 11 Feb 2010 08:17

radon transform
Hello Mathgroup, I am reproducing the sinogram presented in wikipedia: http://en.wikipedia.org/wiki/Radon_transform Notice how easy is to do this in mathematica, the code resembles the text. But my code is terrible slow in computing the radon transform and the image reconstruction... I will appreciate your i... 10 Feb 2010 04:29