« first day (2175 days earlier)      last day (110 days later) » 

12:55 AM
Happy new year! (@Portugal)
 
1:06 AM
@P.Fonseca Happy new year!
 
 
4 hours later…
4:39 AM
@halirutan Happy New Year! Nice blog post. Note you don't need to define f::optx because the message system will use General::optx if f::optx is undefined, unless you want to customize the message for f.
 
5:16 AM
@MichaelE2Thank you for pointing that out. I'm going to review the post. It was written kind of in a hurry.
Happy new year to you and all the people here as well.
@MichaelE2 It is indeed very nice that you pointed this out. I remembered something like that but what I wasn't aware of is that the symbol in the message will still be f and not General even if it is not defined.
Do you know that the Message system will not only use the optx message but attach it to f along the way?
 
5:49 AM
@halirutan Yes, I knew that. And, to quote the Messages tutorial, "You can use Off[F::argx] to switch off the argument count message specifically for the function F. You can also use Off[General::argx] to switch off all messages that use the text of the general message."
 
 
2 hours later…
7:39 AM
happy new year guys
 
 
2 hours later…
9:16 AM
@MichaelE2 I fixed it in the blog post.
 
 
2 hours later…
11:28 AM
Can anybody here know the following Fractal-like figure? What is it?
The filename is sin(x^2+y^2)=t, do you have any idea?
 
 
1 hour later…
12:52 PM
@ArtificialStupidity It doesn't look like this is the used equation.
 
1:12 PM
@halirutan probably t is a function of something.
 
1:31 PM
@ArtificialStupidity Let me think. It might be possible that the additional rings are aliasing patterns. Than it might be the correct formula
 
1:49 PM
@halirutan Thanks you in advance.
 
2:39 PM
@ArtificialStupidity I believe what you see here is something along Sin[x^2+y^2] but it needs to be damped and combined in a different way.
When you damp it, the small ripples fade out after a while
Plot[Sin[x^2]/x^2, {x, -2 Pi, 2 Pi}]
If you make this now 2d and combine several of these at different places, you get the desired pattern.
Here, I have used only four and the overlapping small ripples create the moire
fc = Compile[{{xx, _Real, 0}, {yy, _Real, 0}}, #,
    CompilationTarget -> "C",
    Parallelization -> True, RuntimeAttributes -> {Listable}] &@
  With[{x = xx - mx, y = yy - my},
   Sum[Exp[-(x^2 + y^2)*1.1]*
     Sin[20 (x^2 + y^2)], {mx, {0, 2}}, {my, {0, 2}}]
   ];

data = Outer[List, #, #] &@Table[x, {x, -1, 3, .001}];

Image[Abs[fc @@ Transpose[data, {3, 2, 1}]]]
Ugly hacked code for the above
 
2:56 PM
Hello
 
@Student404Mus Hey.
 
@halirutan No doubt. You must be extremely genius. Thank you!
 
 
6 hours later…
9:15 PM
There was an update to this post:
**Building & Autogenerating Websites with the Wolfram Cloud**
http://community.wolfram.com/groups/-/m/t/1251138
 
9:59 PM
Another fun post: Visualisation of a F1 race
http://community.wolfram.com/groups/-/m/t/1256468
 
 
2 hours later…
11:32 PM
Do we have Ruby enthusiasts in our round?
 

« first day (2175 days earlier)      last day (110 days later) »