Skip to main content
62 votes
Accepted

How to Make a Sankey Diagram

Here's the start of a SankeyDiagram function: ...
Carl Woll's user avatar
  • 131k
45 votes
Accepted

Create the source image for this cool animated illusion

TUTORIAL Import Image img = Import["https://i.sstatic.net/xzcUg.jpg"] Split into Components Using this approach (credit: nikie): ...
corey979's user avatar
  • 24k
39 votes
Accepted

Plot 3D model of DNA in Mathematica

The easiest way to do this is if you have a PDB file, then it's as easy as using Import. Here are a few examples from the RCSB's Protein Data Bank. To get the URLs,...
Jason B.'s user avatar
  • 68.9k
37 votes

How can we produce a graph layout with hierarchical edge bundling in Mathematica?

Update: I wrapped all this up into a small package for those who don't want to go through all the steps but would like to try this out anyway. Warning: There's not a lot of error checking and it may ...
Szabolcs's user avatar
  • 236k
32 votes
Accepted

Visualize an irrational number

With a pie chart around it: ...
halmir's user avatar
  • 15.2k
32 votes
Accepted

How to create diagrams using Wolfram / Mathematica?

...
kglr's user avatar
  • 398k
30 votes
Accepted

How to visualize Riemann surfaces?

You can take Michael Trott's code and modify it a bit to easily plot these surfaces ...
Jason B.'s user avatar
  • 68.9k
30 votes

Plot 3D model of DNA in Mathematica

This was supposed to be a comment to Jason's answer, but it got a bit long. But wouldn't it be cool if you could just input a DNA sequence and have a plot? ... take that little snippet and paste it ...
J. M.'s missing motivation's user avatar
30 votes

How to make a circular heat map or diagram in Mathematica?

A more flexible approach: Pre-process input data to construct a data set for SectorChart. To inject an angular gap in the chart, we add a last column to input data ...
kglr's user avatar
  • 398k
29 votes

Visualize an irrational number

With help of: (1) how to generate repeatable Unique streams? (2) Color Blend in BezierCurve (3) Is it possible to draw really thin lines in Mathematica? here is something to start: ...
Kuba's user avatar
  • 137k
29 votes
Accepted

Sampling "nice" mandelbrot sets?

Excellent question. First I show the result where fractals are sorted from more to less "nice" or "interesting" by going from left to right and top to bottom. This is obvious to the naked eye. In my ...
Vitaliy Kaurov's user avatar
29 votes
Accepted

visualizing a normal mode vibration of a molecule in mathematica

Using a few undocumented functions that have been discussed here on the stack exchange before, ...
Jason B.'s user avatar
  • 68.9k
27 votes
Accepted

How can I handle graphics or artworks with millions of points?

As you note, dealing with millions of points in Graphics will be slow to render. The usual approach for dealing with strange attractors of this sort, is to bin the ...
George Varnavides's user avatar
24 votes
Accepted

How to solve the tsunami model and animate the shallow water wave?

The most hard part of OP's questions is the latter half of 1st one i.e. solve the problem in a little faster or not so demanding-in-memory way. I've found 2 solutions, one is easy but hard to extend,...
xzczd's user avatar
  • 67k
24 votes

Visualizing a holomorphic bijection between the unit disc and a domain

I would like to visualize this function by plotting the images of some horizontal lines inside D. I believe you can gain more insight if you circumvent this ugliness of your mapping completely and ...
halirutan's user avatar
  • 113k
23 votes
Accepted

Plot many curves on the same graph

Update 2: We can combine a toggler-bar legend and FlipView to control curve visibility by clicking on curves and/or legends. (Naturally this approach is less ...
kglr's user avatar
  • 398k
21 votes
Accepted

How to visualize a Cayley graph in this style?

The simple way: g = CayleyGraph[ PermutationGroup[{Cycles[{{1, 2, 3}}], Cycles[{{1, 5}, {2, 4}}]}]] ...
Szabolcs's user avatar
  • 236k
21 votes
Accepted

Plotting the Star of Bethlehem

Hint: $Z$ is the Jacobian for the transformation between $(x,y)$ and $(s,t)$ coordinates. No need to even define $Z$, no need to invert polynomials, no branch cuts. ...
Roman's user avatar
  • 48.3k
20 votes
Accepted

Multiple reflections of a laser beam in a triangle

Based on some geometric operations such as reflection and line-line intersection (LLI), I wrote up a small code. Hope this could be a starting point to build a more compact ...
Joo-Haeng Lee's user avatar
20 votes

How to Make a Sankey Diagram

EDIT 01: Found some time to package these in a function (see end of post for code). It accepts an association as input, with the following key-value pairs: ...
George Varnavides's user avatar
20 votes
Accepted

Making an interactive visualization of the eigenvectors of two-dimensional matrices

The following is an attempt to recreate a similar sort of interactive visualization, showing the eigenvectors (when real), and how the various points of the unit circle are transformed by the matrix. ...
glS's user avatar
  • 7,663
20 votes

Plotting the Star of Bethlehem

The noise in the picture given by OP seems to suggest random number has been used, so here's my trial: ...
xzczd's user avatar
  • 67k
20 votes
Accepted

Bridget Riley - Movement in Squares and Circles

Since I like the color image more than the black-and-white... ...
azerbajdzan's user avatar
  • 19.7k
19 votes

How to plot Venn diagrams with Mathematica?

A series of n cosine functions at successively doubled frequencies can be phased so their signs produce a Gray Code (– for 0, + for 1). If these cosines are also scaled to successively halved ...
RRas's user avatar
  • 548
19 votes
Accepted

How to improve quality of this Plot3D

You can do it using ListPlot3D, and those effect go away ...
Nasser's user avatar
  • 146k
18 votes
Accepted

How to draw a hanging rootogram in Mathematica?

...
kglr's user avatar
  • 398k
18 votes

Finding and visualization of branch cuts and branch points

Perhaps you can make use of the internal functions ComplexAnalysis`BranchCuts and ComplexAnalysis`BranchPoints. First, use a ...
Carl Woll's user avatar
  • 131k
18 votes
Accepted

WordCloud: do not eliminate duplicates

Make it render the same but be a different thing: RawBoxes @ TagBox[ToBoxes[#], Unique@#] & /@ {foo, foo, foo} // WordCloud Or shorter but less documented: <...
Kuba's user avatar
  • 137k
18 votes

WordCloud: do not eliminate duplicates

lst = {"foo","foo","foo"}; WordCloud @ MapIndexed[Interpretation] @ lst Also ...
kglr's user avatar
  • 398k
18 votes

How to create diagrams using Wolfram / Mathematica?

...
Nasser's user avatar
  • 146k

Only top scored, non community-wiki answers of a minimum length are eligible