Ecosyste.ms: Awesome

An open API service indexing awesome lists of open source software.

Awesome Lists | Featured Topics | Projects

https://github.com/ramnathv/rChartsCalmap

An htmlwidgets binding for calendar heat maps using d3
https://github.com/ramnathv/rChartsCalmap

Last synced: 3 months ago
JSON representation

An htmlwidgets binding for calendar heat maps using d3

Awesome Lists containing this project

README

        

## rChartsCalmap

This is an [htmlwidgets](http://htmlwidgets.org) binding for the excellent [Cal-Heatmap](http://kamisama.github.io/cal-heatmap/) plugin, developed by [Wan Qi Chen](https://github.com/kamisama). This binding was motivated by a tweet by [Alex Bresler](https://twitter.com/abresler/status/412314310782644224/photo/1) and uses data provided by him on points scored by Paul George.

You can install it from `github` using `devtools`.

```S
library(devtools)
install.packages('htmlwidgets')
install_github("ramnathv/rChartsCalmap")
```

### Quick Start

Let us start with some data on points scored by Paul George.

```r
dat <- read.csv('http://t.co/mN2RgcyQFc')[,c('date', 'pts')]
library(rChartsCalmap)
r1 <- calheatmap(x = 'date', y = 'pts',
data = dat,
domain = 'month',
start = "2012-10-27",
legend = seq(10, 50, 10),
itemName = 'point',
range = 7
)
r1
```

![calmap1](http://i.imgur.com/abBCyk8.png)

Here is another example showing stock price of APPLE.

```r
library(quantmod)
getSymbols("AAPL")
xts_to_df <- function(xt){
data.frame(
date = format(as.Date(index(xt)), '%Y-%m-%d'),
coredata(xt)
)
}

dat = xts_to_df(AAPL)
calheatmap('date', 'AAPL.Adjusted',
data = dat,
domain = 'month',
legend = seq(500, 700, 40),
start = '2014-01-01',
itemName = '$$'
)
```

![apple](http://i.imgur.com/G5xvsFk.png)