« first day (1230 days earlier)      last day (3260 days later) » 

12:11 AM
@halirutan, I'm familiar with Trefethen from the SIAM 100-digit challenge and his stuff on conformal mappings. I decided to look around on his site when I came across this essay.
 
 
1 hour later…
1:13 AM
@Guesswhoitis. Thanks. I had hoped you check some general places (like reddit) regularly.
 
 
4 hours later…
5:06 AM
Wonders of esoteric formats... Shapeways has their own SVX voxel format for 3D printing - which is conveniently just stacks of per-attribute PNGs in a ZIP file with some XML metadata on the side. For some tasks, this is much more convenient than polygonal mesh. They don't actually state that they support uploads on that format, though...
I've had sufficient amount of pain with mesh generation in Mma; I gladly move to producing that format instead.
A stupid hobby: printing mathematical objects in polished silver...
 
 
2 hours later…
7:19 AM
BTW: how feasible it is to build domain-specific geometric editor UIs with Mma? I'm mostly thinking of click-selecting geometric objects on a multi-object view and defining relations (such as "these objects are constrained to have distance of at least X") between them, which would then be visualized in the view, and eventually processed...
 
 
9 hours later…
4:30 PM
I have been trying to create polymer chain. Using this code : a = 1; x = y = 0; p = {};
For[i = 1, i < 100, i++, p = Append[p, {x, y}];
dtheta = Random[NormalDistribution[0, 0.3]];
{x, y} = {x, y} + {a Cos[dtheta], a Sin[dtheta]};]
I getting not so smooth polymer chain
I am getting not so smooth polymer chain: imgur.com/9VenjgF
Is there a way to make it smooth?
 
5:08 PM
@psimeson
Manipulate[
 Graphics@Line@
   AnglePath@
    RandomVariate[NormalDistribution[0, roughness],
     100], {roughness, .01, .5}]
You can reduce the variance of your distribution. Also, you probably want to accumulate the thetas instead of offsetting each one from 0.
 
AnglePath is only in Mathematica 10
@MichaelHale: I need to create a two-dimensional polymer path of equal length segments, where the orientation of each segment is changed from the orientation of the previous segment by an angle difference dtheta that is taken from a normal distribution with standard deviation sigma in radians.
That's what I am trying to accomplish.
 
@psimeson
anglePath[angles_] :=
 FoldList[# + {Cos@#2, Sin@#2} &, {0, 0}, Accumulate@angles]
Yes, that's what the code I gave you does. Substitute anglePath for AnglePath in pre-V10.
 
How can I control the length of each segment of the polymer?
 
5:24 PM
@psimeson The same way you were with a.
anglePath[angles_, length_] :=
 FoldList[# + length {Cos@#2, Sin@#2} &, {0, 0}, Accumulate@angles]
Manipulate[
 Graphics@Line@
   anglePath[RandomVariate[NormalDistribution[0, roughness], 100],
    10], {roughness, .01, .5}]
 
This way I will get a polymer with each segment of length "length" right?
 
@psimeson Yes
 
How can I verify that each segment has length "length"?
Is there a way to extract x and y coordinates of this polymer?
 
@psimeson
Norm /@ Differences@
  anglePath[RandomVariate[NormalDistribution[0, .1], 100], 10]
The output from anglePath is the coordinates.
 
anglePath[angles_] :=
FoldList[# + a {Cos@#2, Sin@#2} &, {0, 0}, Accumulate@angles]
Graphics@Line@
anglePath[RandomVariate[NormalDistribution[0, 0.3], 100], 10]
a = 2;
I got blank pink box. I just didn't want to use Manipulate
Sorry! I found my mistake
How can I get the output from anglePath to see all the x and y coordinate?
 
5:42 PM
@psimeson Delete "Graphics@Line@"
 
I did this anglePath[RandomVariate[NormalDistribution[0, .2], 100], a]
the problem is it would be different from the ordinates that I used to make the polymer before right? Is there a way to put some seed so that I would get same set of co-ordinates for that seed?
 
@psimeson You could reset a random seed, but normal in this situation would be to just store the anglePath results in a variable and then use those coordinates in the graphics and wherever else you need.
 
I can do this p = anglePath[RandomVariate[NormalDistribution[0, .2], 100], a] and ListLinePlot[p]
 
@psimeson ListLinePlot will rescale the axes. Graphics@Line@p is undistorted.
 
Thanks a lot @MichaelHale. Could you please explain how anglePath[angles_, length_] := FoldList[# + length {Cos@#2, Sin@#2} &, {0, 0}, Accumulate@angles] works? Why does your code appear in such nice format in the chat?
 
5:49 PM
If you indent a message it will appear in a mono-spaced font. Highlight and press Ctrl+k or click the button beside upload when it appears.
 
Test: anglePath[angles_, length_] :=
 FoldList[# + length {Cos@#2, Sin@#2} &, {0, 0}, Accumulate@angles]
Got it
 
 
1 hour later…
7:19 PM
A more complicated petanque ball. :)
 
 
3 hours later…
10:10 PM
Would starting another instance of Mathematica confuse the first one allready up on my windows PC? I am running long computation on the first one, and I am afraid if I start second Mathematica (so I can do something on another notebook) it might break the first Mathematica running or confuse it?
I know one is allowed to start 2 Mathematica instances on the same PC.
May be I'll just try it and find out. I could always reboot if it hangs.
 
10:27 PM
Well, I tried it. After little bit I got message from the first instance "The kernel Local has quit (exited) during the course of an evaluation." I do not know if this is due to my running a second instance of Mathematica or not.
 
@Nasser I run two instances almost always.
 
@MichaelHale Ok, thanks. May be the kernel crash was not related to it then.
I am running windows 7, and now, just today, I started see this small icon show up on my tray below, telling me to upgrade to windows 10 !
May be others on windows 7 will see the icon. It is small icon just showed up, on the task bar
No way will I upgrade. I like windows 7, and everything works on it. If it ain't broke, do not fix it.
 
10:48 PM
@Nasser Yeah, I got the same icon starting today as well.
 
@MichaelHale I will consider upgrading, if Mathematica will run faster/better on windows 10.
But will wait until others try it first.
 
@Nasser Heh, yeah. These days I just cross my fingers nothing unexpected breaks when I upgrade anything.
 
@MichaelHale I usually plan to waste one whole week if I update an OS. So many things will break, and many new things to reset to get things the way they used to work.
 
11:20 PM
Not as much luck searching for interesting things in symbolic systems as cellular automata. Most interesting one I've found so far isn't nearly as interesting as some that Wolfram found.
I'm going to revisit network automata next, but look at adding types to vertices and edges to see if there is rampant complexity in that space.
 
11:57 PM
@kirma, not that stupid, but rather expensive. :D I wouldn't mind seeing a minimal surface rendered in silver myself.
 

« first day (1230 days earlier)      last day (3260 days later) »