New answers tagged

3 votes
Accepted

How to Optimize Integro-Differential Equation Solving Time in Mathematica?

To stop messages from NIntegrate use option Method -> "LocalAdaptive". To stop messages from ...
Alex Trounev's user avatar
  • 44.5k
7 votes
Accepted

Given two functions, generate all nested applications of the functions to a given order

Using Composition: ...
Syed's user avatar
  • 53.3k
7 votes

Given two functions, generate all nested applications of the functions to a given order

First level a = {f[x], g[x]}; Second level b = Flatten @ Transpose @ Query[All, {f, g}] @ a {f[f[x]], f[g[x]], g[f[x]], g[g[x]...
eldo's user avatar
  • 69.1k
6 votes

Reproduce the annulus fractal

Inspired by @kglr, this is a faster version ...
chyanog's user avatar
  • 15.5k
12 votes
Accepted

Reproduce the annulus fractal

First, a variation on @azerbajdzan's approach to subdivide an annulus: ...
kglr's user avatar
  • 395k
5 votes

Reproduce the annulus fractal

In 3D ...
rhermans's user avatar
  • 36.5k
13 votes

Reproduce the annulus fractal

There is some bug in ConicGradientFilling if more than 2 colors are used. (see line at right of each annulus) Bellow are images ...
azerbajdzan's user avatar
  • 16.2k
1 vote

Replacing elements at a single level in a nested list

list = {{0, 0}, 0, 0, 0, {0, 0, 0}, {{0, 0}, 0}, 0, 0}; Grabbing the @eldo's list and using SubsetMap: ...
E. Chan-López's user avatar
1 vote

Replacing elements at a single level in a nested list

list = {{0, 0}, 0, 0, 0, {0, 0, 0}, {{0, 0}, 0}, 0, 0}; Using SequenceReplace (new in 11.3) ...
eldo's user avatar
  • 69.1k

Top 50 recent answers are included