首先，加载recharts:

library(recharts)

1 介绍Introduction

蜡烛图也叫K线图。

关键是：

  • 文本型x
  • 数值型’y’ (4列) 按’开盘’、‘收盘’、‘最低价’、’最高价’顺序排列

2 用法Function Call

echartr(data, x, y, <t>, <type>)
参数 要求

data

数据框格式的源数据

x

文本型自变量，如提供多个变量，只传入第一个。

y

数值型自变量，只传入前四列且必须按’开盘’、‘收盘’、‘最低价’、’最高价’顺序排列。

t

时间轴变量，转为因子计算。如提供多个变量，只传入第一个。

type

‘k’ 或 ‘candlestick’

3 举例Showcase

3.1 基本图形Basic Plot

echartr(stock, as.character(date), c(open, close, low, high), type='k') %>%
    setXAxis(name='Date', axisLabel=list(rotate=30)) %>%
    setYAxis(name="Price")

3.2 带时间轴With Timeline

还记得快速入门中的特别注意事项吗？我们要修补一下数据，让它包含x和t各自所有水平的完整组合。

stock$Month <- format(stock$date, '%m')
stock$Day <- format(stock$date, '%d')
fullData <- data.frame(expand.grid(unique(stock$Month), unique(stock$Day)))
names(fullData) <- c("Month", "Day")
stock <- merge(stock, fullData, all.y=TRUE)

只有这样时间轴才正常显示。

echartr(stock, Day, c(open, close, low, high), t=Month, type='k') %>%
    setYAxis(name="Price")

4 其他设定Futher Setup

接下来可以配置控件、添加标注点/标注线，以及美化成图。

参考相关函数，尽情探索吧。