standalone visualization → TimelyPortfolio 8tutorial → TimelyPortfolio 8standalone visualization → Ramnath Vaidyanathan 6d3 → sankey 5multiple → tutorial 5polychart → multiple 4bar chart → standalone visualization 3gallery → TimelyPortfolio 3multiple → gallery 3sankey → standalone visualization 3scatterplot → standalone visualization 3shinyapp → Ramnath Vaidyanathan 3area → standalone visualization 2combination → multiple 2datatables → table 2dimple → multiple 2dimple → scatter 2highcharts → area 2nvd3 → bar chart 2standalone visualization → Alex Bresler 2standalone visualization → pssGuy 2standalone visualization → Thomas Reinholdsson 2table → standalone visualization 2timeline → standalone visualization 2timelinejs → timeline 2tutorial → Ramnath Vaidyanathan 2block matrix → standalone visualization 1blog post → TimelyPortfolio 1bump chart → standalone visualization 1cumulative line → tutorial 1custom → standalone visualization 1d3 → cumulative line 1d3 → custom 1dashboard → shinyapp 1dashifyr → dashboard 1dimple → block matrix 1highcharts → bar chart 1highcharts → line chart 1highcharts → scatterplot 1leaflet → map 1line chart → standalone visualization 1line chart → tutorial 1map → shinyapp 1morris → line chart 1morris → multiple 1multiple → shinyapp 1multiple → standalone visualization 1nvd3 → scatterplot 1parallel coordinates → tutorial 1parcoords → parallel coordinates 1polychart → scatterplot 1rickshaw → bump chart 1rickshaw → multiple 1sankey → blog post 1sankey → tutorial 1scatter → standalone visualization 1scatter → tutorial 1standalone visualization → Ian Dunham 1area 2areastandalone visualization 21standalone visualizationbar chart 3bar chartblock matrix 1block matrixblog post 1blog postTimelyPortfolio 20TimelyPortfoliobump chart 1bump chartcombination 2combinationmultiple 10multiplecumulative line 1cumulative linetutorial 10tutorialcustom 1customd3 7d3sankey 5sankeydashboard 1dashboardshinyapp 3shinyappdashifyr 1dashifyrdatatables 2datatablestable 2tabledimple 5dimplescatter 2scattergallery 3galleryhighcharts 5highchartsline chart 2line chartscatterplot 3scatterplotleaflet 1leafletmap 1mapmorris 2morrisnvd3 3nvd3parallel coordinates 1parallel coordinatesparcoords 1parcoordspolychart 5polychartrickshaw 2rickshawRamnath Vaidyanathan 11Ramnath VaidyanathanAlex Bresler 2Alex BreslerIan Dunham 1Ian DunhampssGuy 2pssGuyThomas Reinholdsson 2Thomas Reinholdssontimeline 2timelinetimelinejs 2timelinejs

  1. require(rCharts)
  2. require(plyr)
  4. gallery <- read.csv(
  5.   "https://docs.google.com/spreadsheet/pub?key=0AovoNzJt5GetdEhQVDgyYXpJMnZ2M2J2YmtvX0I5Snc&output=csv",
  6.   stringsAsFactors = FALSE
  7. )
  9. gallery.use <- gallery[,c("technology","visualizationType","documentType","author")]
  10. colnames(gallery.use) <- rep("column",4)
  12. gallery.edge <- rbind(
  13.   gallery.use[,1:2],
  14.   gallery.use[,2:3],
  15.   gallery.use[,3:4],
  16.   deparse.level=1
  17. )
  19. colnames(gallery.edge) <- c("source","target")
  21. gallery.edge <- ddply(gallery.edge,~source+target,nrow)
  23. colnames(gallery.edge) <- c("source","target","value")
  25. #verify that no source = target
  26. #or will get stuck in infinite loop
  27. gallery.edge[which(gallery.edge[,1]==gallery.edge[,2]),]
  31. gallery.edge$source <- as.character(gallery.edge$source)
  32. gallery.edge$target <- as.character(gallery.edge$target)
  33. sankeyPlot2 <- rCharts$new()
  34. sankeyPlot2$setLib('//timelyportfolio.github.io/rCharts_d3_sankey/')
  35. sankeyPlot2$set(
  36.   data = gallery.edge,
  37.   nodeWidth = 15,
  38.   nodePadding = 10,
  39.   layout = 32,
  40.   width = 960,
  41.   height = 500
  42. )
  43. sankeyPlot2