Mathematica

How to combine Dynamic graphics in Show?
Ver 7. Hello; Without the use of DynamicModule[], just some simple code. I have one Plot and one ListPlot, and I wanted to combine them. Ofcourse I can use Show[], but when one of the above objects is Dynamics, I can't do that. I tried many things, and so far, no success. This is what I have and what I ... 7 Dec 2009 03:04

Finding how to do things by trial and error
This is just some rambling on my part. Nothing serious: Mathematica can sometimes require lots of trial and error to find how to do something. This is a small example, which took me 15 minutes to find how to do. I wanted to make a Manipulate with one control to the left and one to the right of the display ... 6 Dec 2009 02:01

Foldlist with more than one list as argument
I think this function can be particularly useful : FoldListN[f_,x_,l_] := FoldList[f[#1,Sequence@@#2]&,x,Transpose[l]] Example : l1 = {a,b,c}; l2 = {1,2,3}; l3 = {=80,=B2,=FF}; l4={X,Y,Z}; FoldListN[f,x,{l1,l2,l3,l4}] output : {x,f[x,4,1,=80,X],f[f[x,4,1,=80,X],b,2,=B2,Y],f[f[f[x,4,1,=80,X],b,2,=B2,Y],... 5 Dec 2009 06:23

** DECEMBER DISCOUNT: A WorkLife FrameWork....
Sorry about the all caps headline... it seems that marketing sometimes requires a bit of bravado.... For the month of December, A WorkLife FrameWork is being offered at a discount if purchased from Scientific Arts (the developer's site). Read more about it at http://Scientificarts.com/worklife Regular li... 4 Dec 2009 05:11

Flatten alternative
I am trying to create a function myflat[list] to mimic the behavior of Mathematica's Flatten[] function.Example: In[1]:= myflat[{{{a}}, {b, c}, {d}}] Out[1]= {a, b, c, d} In[2]:= myflat[{{}, 1, {{2}}}] Out[2]= {1, 2} However in writing this function I want to use only Mathematica's pattern matching features, t... 5 Dec 2009 06:23

Manipulate jitter
I want to use Manipulate to slide the range of a Plot. I get jitters when an axis tick mark and associated number coincides with the frame edge. A simple example is: Manipulate[ Plot[Sin[x], {x, s, s + 10}, PlotRange -> {{s, s + 10}, {-1, 1}}, Frame -> True, Axes -> False], {s, 0, 20}] Anyone know how to s... 4 Dec 2009 05:11

Plot3d causes crash with radeon driver and
On Mon, 2009-11-23 at 06:50 -0500, Garrett wrote: On Nov 8, 6:52 am, Pavel Pokorny <pavel.pokora.poko...(a)gmail.com> wrote: On Oct 29, 4:00 am, Nils Kanning <n...(a)kanning.de> wrote: Hi, I'm using Mathematica 7.0.1 on Debian testing with the open source radeon driver (xserve... 3 Dec 2009 07:01

Integrating with HypergeometricU
Hi, first time I use the mailing list so I hope I am doing this properly. I am trying to do the following indefinite integral with mathematica: --- \[Integral](1/( 64 (a0 + Sqrt[b0])^3 Gamma[5/4 + a0/(4 a0 - 4 I Sqrt[b0])]^4) E^( 1/2 I Sqrt[b0] k1^2 \[Tau]^2 + 1/2 I Sqrt[b0] k2^2 \[Tau]^2 + 1/2 I... 3 Dec 2009 07:01

NDSolve with momentum
Hi, Does anyone know how to use NDSolve to create the trajectory of motion of a point following positive gradients on an arbitrary landscape (a ListStreamPlot-like path), but with 'momentum'? The idea is that the trajectory would not terminate on smaller local maxima, depending on the momentum term. I don... 4 Dec 2009 05:11

error message in FindClusters[] of text using
Hi, Quoting Wiki: "In information theory, the Hamming distance between two strings of *equal* length is the..." so what about FindClusters[Select[DictionaryLookup["a*"], StringLength[#] == 5 &], DistanceFunction -> HammingDistance] ? Cheers Patrick On Tue, 2009-12-01 at 04:12 -0500, divisor wr... 3 Dec 2009 07:01