4.45 Tuesday, February 7, 2017

================================== 
Top new questions this week: 
==================================

[Code that generates a mandala] http://mathematica.stackexchange.com/questions/136974/code-that-generates-a-mandala

My little brother asked me to print original mandalas for coloring. I would like some idea on how to create them, but without color, so he can color them.

examples

- asked by zeros (31 votes), answered by Anton Antonov (48 votes)

—————————-

[How to make Mathematica variables declarative instead of just-in-time?] http://mathematica.stackexchange.com/questions/136833/how-to-make-mathematica-variables-declarative-instead-of-just-in-time

Is there a way to have Mathematica at the notebook level 
(SetOptions[EvaluationNotebook[], CellContext -> Notebook]) 
only uses a set of declared variables in the notebook context. Any variables  ...

- asked by Edmund (27 votes), answered by rcollyer (25 votes)

—————————-

[Shorthand for map at level 2] http://mathematica.stackexchange.com/questions/136751/shorthand-for-map-at-level-2

I love the shorthand /@. It is amazing for readability (and laziness when typing). 
However, right now I find that I need Map at level 2, i.e. 
Map[f, List[List[a,b],List[c,d]], {2}], a lot and I'd wish  ...

- asked by Kvothe (16 votes), answered by Mr.Wizard (19 votes)

—————————-

[Proteins, ProteinData, WolframAlpha] http://mathematica.stackexchange.com/questions/136741/proteins-proteindata-wolframalpha

Apologies in advance, this is the first I’ve messed with ProteinData and access through WolframAlpha, so clearly I may not know how Mathematica and Alpha decide on what is the ’right way’ to ask ...

- asked by flip (15 votes), answered by J. M. (10 votes)

—————————-

[Simplifying a reverse Fold for a Query] http://mathematica.stackexchange.com/questions/136856/simplifying-a-reverse-fold-for-a-query

Is there a simpler way to parametrize this tail-recursive expression to be applied as a Query (for processing a nested Association)? The pattern is shown by example with first 3 levels:

- asked by alancalvitti (11 votes), answered by Edmund (10 votes)

—————————-

[Where is Abbott? How to make logograms from the film "Arrival"?] http://mathematica.stackexchange.com/questions/137156/where-is-abbott-how-to-make-logograms-from-the-film-arrival

The film Arrival showed Wolfram Language code in action analysing alien logograms. A recent blog describes some details and mentions a live-coding video by Christopher Wolfam. See also Stephen ...

- asked by KennyColnago (8 votes), answered by KennyColnago (10 votes)

—————————-

[How to implement neural style transfer?] http://mathematica.stackexchange.com/questions/136704/how-to-implement-neural-style-transfer

In the paper A Neural Algorithm of Artistic Style, Leon A. Gatys et all. describe a process of extracting the content and style vectors from an image separately. They use this technique to generate ...

- asked by M.R. (8 votes)

================================== Greatest hits from previous weeks: ==================================

[How to add a vertical line to a plot] http://mathematica.stackexchange.com/questions/3561/how-to-add-a-vertical-line-to-a-plot

In the plot below I would like to add two vertical lines at \(x = \frac {\pi }{15} \pm \frac {1}{20}\). How can I do that?

f[x_] := (x^2 z)/((x^2 - y^2)^2 + 4 q^2 x^2) /. {y -> /15, z -> 1, q ->  ...

- asked by sjdh (32 votes), answered by Ajasja (48 votes)

—————————-

[Calculate the 2D Fourier transform of an Image] http://mathematica.stackexchange.com/questions/29203/calculate-the-2d-fourier-transform-of-an-image

I am new to Mathematica, and using version 8.0.

I would like to calculate the 2D Fourier Transform of an Image with Mathematica and plot the magnitude and phase spectrum, as well as reconstruct the ...

- asked by user8727 (5 votes), answered by Nasser (27 votes)

================================== Can you answer these? ==================================

[Nonsparse sparse array crashes kernel on windows] http://mathematica.stackexchange.com/questions/136835/nonsparse-sparse-array-crashes-kernel-on-windows

On win 10, 64 bit, version 11.0.1, my kernel just started crashing for no reason as for as I can see. Does/should the following crash your kernel?

sparse = SparseArray[ArrayRules[RandomInteger[{1,  ...

- asked by Coolwater (6 votes)

—————————-

[How to visualize the vorticity of a 3D velocity field?] http://mathematica.stackexchange.com/questions/136917/how-to-visualize-the-vorticity-of-a-3d-velocity-field

I have a snapshot of a system with 50 particles.

The snapshot is a list of 3 coordinates and 3 velocities per each particle. Namely, \((x,y,z,\dot {x},\dot {y},\dot {z})\), which AKA phase space ...

- asked by 0x90 (5 votes)

—————————-

[Finding line segments on the image by using ImageLines] http://mathematica.stackexchange.com/questions/136795/finding-line-segments-on-the-image-by-using-imagelines

There is an image from wolfram documentation

I want to find and highlight lines on the following image

I tried:

img = Import["http://imgur.com/NbNwYWC.png"] 
 
lines = ImageLines[EdgeDetect[img],  ...

- asked by vito (3 votes)