minard: Minard Napoleon Russian campaign data

In ischeinfeld/riverplot: Sankey or Ribbon Plots

Description

The data set used by Charles Joseph Minard to generate the famous graph. The example below shows how to recreate the main panel of the graph using riverplot from the provided data.

First, node and edge data frames must get new column names (see makeRiver function for details). Then, based on the direction of the Napoleon army, style information (right and left edge color style for each node) is entered in the nodes variable. Then, a riverplot object is generated from the nodes and edges data frames.

To use the same color coding as Minard, the direction variable is converted to color codes in the col column of the edges object.

Finally, a plot is created using lty=1 and a style in which nodes are not shown, and the edges are straight (like in the original Minard plot) rather than curved.

Usage

minard

Format

Named list with two data frames:

nodes

data frame with geographic locations of the Napoleon army (longitude and latitude) and the direction of the march

edges

connections between positions

Author(s)

January Weiner

Source

Charles Joseph Minard

Examples

data( minard )
nodes <- minard$nodes
edges <- minard$edges
colnames( nodes ) <- c( "ID", "x", "y" )
colnames( edges ) <- c( "N1", "N2", "Value", "direction" )

# color the edges by troop movement direction
edges$col <- c( "#e5cbaa", "black" )[ factor( edges$direction ) ]
# color edges by their color rather than by gradient between the nodes
edges$edgecol <- "col"

# generate the riverplot object and a style
river <- makeRiver( nodes, edges )
style <- list( edgestyle= "straight", nodestyle= "invisible" )

# plot the generated object
plot( river, lty= 1, default_style= style )
# Add cities
with( minard$cities, points( Longitude, Latitude, pch= 19 ) )
with( minard$cities, text( Longitude, Latitude, Name, adj= c( 0, 0 ) ) )

ischeinfeld/riverplot documentation built on May 13, 2019, 4:05 a.m.