wxffles
Reputation
9,317
Top tag
Next privilege 10,000 Rep.
Access moderator tools
 Apr 18 comment Better alternative to Hold/ReleaseHold for postfix application of Monitor I tend to use an infix version Table[...] ~Monitor~ n. Apr 18 comment “Save Graphic As…” suddenly doesn't work It is cunningly prompting you to use PNGs, because nobody likes fuzzy graphs. Apr 15 comment A Difficult Application of Modular Arithmetic Your explanation doesn't seem to match your numbers. Why is the 6 not doubled to 12 in the first step? How does the 2 in {2,5,1} go to 0? 2*2 + 4 is not 0 mod 5. Apr 13 comment Why does ContourPlot refuse to draw all 4 quadrants whenever fractional powers are in the implicit function? A cube root has three possible values. To ensure you get a real one, you could use Surd. For example Surd[x^2, 3]. Apr 13 comment How to get a larger mouse cursor You could use a third party program such as Yolomouse. Apr 13 comment Twin Prime Max Gaps (Performance Tuning) @Elem-Teach-w-Bach-n-Math-Ed Your max of consecutiveValues bit doesn't take into account if it's true or false. For small ranges of primes sometimes the longest run is the wrong type. Apr 13 answered Twin Prime Max Gaps (Performance Tuning) Apr 12 comment How to draw all paths from (1,1) to (n,n) by move (+1, 0) or (0, +1)? @J.M. Thanks, it was a bit of an ugly rush job (which seems to have blown up overnight). If anyone is feeling really sassy, they could sort out the crossovers on the top right. Apr 12 awarded Nice Answer Apr 12 answered How to draw all paths from (1,1) to (n,n) by move (+1, 0) or (0, +1)? Apr 7 comment double sum with condition You could just put an If statement inside your sum: If[n^2 + m^2 == 0, 0, ...]. Apr 4 comment ListPlot and Show n plots from two lists with large n Thread[{steps, #}] & /@ Transpose@eigenvalues Mar 30 comment Play the sound of $\pi$ To mimic the random integer, you could try ternary digits minus 1: Accumulate[First@RealDigits[Pi, 3, 100] - 1]] Mar 30 comment How to define a custom 2/3D graphic primitive like built-in? You could do something less fancy like, BezierSurface[ctrlnets_] := First@ParametricPlot3D[...]. Mar 23 comment Import Excel sheet into 3D array, 1st row and column as x- and y-axis Perhaps Flatten[MapThread[Append, {Outer[List, xlist, ylist], Transpose@data}, 2], 1]? Mar 23 comment positions satisfying pattern and grouped You can use Split to do the last step, or fancier stuff from this question. Mar 23 awarded plotting Mar 22 answered How to add caption text to a Plot? Mar 21 answered How to find a tangent line with 2 points of tangency for a curve? Feb 24 comment Symmetric properties of KroneckerDelta under replacement Attributes[f] = {Orderless}