Interactive heatmap

library(knitr) 
library(d3heatmap) 
library(flexdashboard)
url <- "http://datasets.flowingdata.com/ppg2008.csv" 
nba_players <- read.csv(url, row.names = 1) 

Stats by Player

d3heatmap(nba_players, scale = "column")