User Portlet User Portlet

Henrik Schachner
Discussions
> If it is rationalized it start to work properly. Interesting! And ``DiscretizeRegion[]`` seems to be annother way to make it work, e.g.: outer = RegionDifference[Rectangle[{-1, -1}, {1, 1}], DiscretizeRegion@ ...
Nicely done and very interesting, thanks for sharing! It is somewhat related to an old post of mine: [Knitting images: using Radon transform and its inverse for creative arts][1] but I disregarded fixed nail points. [1]:...
That is a very nice and interesting outline of the Collatz conjecture - thanks for sharing! Just as a shy remark: I find it inspiring if the above "scatter plot of seed vs. sequence length" is plotted using logarithmic scaling (`ScalingFunctions ->...
Robert, maybe this is what you are trying to achieve: videoList = With[{obj = PolyhedronData["Icosahedron"]}, Table[Show[obj, SphericalRegion -> True, ViewVector -> {5 Cos[t], 5 Sin[t], 5}], {t, 0, 2 Pi, .05}]]; ...
From the documentation on `N`[*expr*]: > Unless numbers in expr are exact, or of sufficiently high precision, N[expr,n] may not be able to give results with n-digit precision. So - instead of writing `Sin[1.002547]` an exact argument should be...
Ulrich, I may be on the wrong track, but I think `ParallelEvaluate[]` is exactly what you do *not* want, as it is intended to evaluate *the same* on each kernel. Would the following simple approach work for you? mat[t_] := Array[Sin[#1 t]...
Here is one way (but probably not the most elegant one): ds[All, #x, "y" -> #y - ds[Max, "y"]|> &] My suspicion is that this not very effective, because this way `ds[Max, "y"]` seems to be evaluated again and again, as this does suggest so...
Flora, you are not posting the full code, but only an image of only part of the code. One problem seems to be that you are trying to detect the spots using `ColorsNear[Black]` - but having a black background. Here comes another approach -...
Well - ok! I do admit that I was simply not willig to even consider a bug in a function which belongs to the prominent Fourier-family ... At least ``PeriodogramArray[]`` seems to give a correct result: n = 100; data = Cos[2 \[Pi]...