2,630 reputation
216
bio website mathani.tumblr.com
location
age
visits member for 1 year, 8 months
seen Nov 6 at 15:42

honeycomb decay

Mathematica can save time delays between frames together with animated GIF (look for "DisplayDurations" under options of GIF format). This in turn allowed me to produce exactly 28 frames for the decay of this honeycomb with 28 cells. Modelling radioactive decay, where for example time intervals between clicks on a Geiger counter are approximately exponentially distributed, I can simulate the delays (rounded and shifted to run from t1/100-th seconds with average value (t1+t0)/100-th seconds) as:

delays[{t1_, t0_}, n_] :=
 t1 + Round[
   RandomVariate[ExponentialDistribution[1/t0], n]]

I set t1=2 here. Most browser can't present a delay of 2/100-th seconds properly. Chrome can.


Mar
29
comment Translating MATLAB's cell2mat into Mathematica
Yet couldn't we legitimize this question? Is the example in Mathematica {{{1}, {2, 3, 4}}, {{{5}, {9}}, {{6, 7, 8}, {10, 11, 12}}}}? How does one turn this into normal matrix?
Mar
28
comment How to plot a parametric region representing a coordinate transformation
What does t = infinity mean here? As I understand arctan(T/X) runs merely from -1 to 1, and so t from -Pi/4 to Pi/4 ... ?
Mar
28
answered How to plot a parametric region representing a coordinate transformation
Mar
28
comment Matrix Determinant
StringTake wouldn't work for row12 for example with two digits. This would work: StringTrim[#, {"row" ~~ DigitCharacter .. ~~ "(", ")"}] & /@ s
Mar
28
answered Matrix Determinant
Mar
26
comment Placeholders for map inside a map
But extracting one column doesn't need Map. Part[list1, All, 2] extracts 2nd column, and Map[Part[list1, All, #] &, {1, 3}] both 1st and 3rd.
Mar
26
answered Extract attribute data from an XMLElement
Mar
26
comment Generating evenly spaced points on a curve
@Szabolcs I was asking. I think now that MeshFunctions -> (#4&) samples points with a constant step for parameter, which don't make the desired arcs.
Mar
25
answered Mark selected sub-lists in the list they were selected from
Mar
25
comment Generating evenly spaced points on a curve
In terms of points being equidistant (making evenly spaced arc lengths), what does ParametricPlot3D[f[t], {t, 0, 2 Pi}, Mesh -> 20, MeshFunctions -> (#4 &)] produce differently? Because I can Cases them out there.
Mar
25
awarded  Scholar
Mar
25
accepted Equidistant points on a polyline
Mar
25
comment Equidistant points on a polyline
Basic-calculus approach, clean and tiny. Thank you. The jumping around the original point parameter values isn't noticeable in my animation -- and I can decrease the step size which diminishes the jumping, and then Take only every second, third or so point since there are probably too many for my purpose.
Mar
25
awarded  Nice Question
Mar
24
comment Equidistant points on a polyline
@bills Values, yes. Otherwise Dashing? :) Vitaliy linked to an elegant solution, will study that.
Mar
24
awarded  Supporter
Mar
24
awarded  Student
Mar
24
asked Equidistant points on a polyline
Mar
24
comment LinePlot in For loop
@mofai Cool. Some of the programming here is not very exemplary. Yet everything always has pedagogical value. :)
Mar
24
awarded  Teacher