geom_GeomLinerangeBC(), geom_GeomRectCS(), geom_GeomSegmentBC() has yet to be implemented in plotly.

[fc1984]

Hi,
When I try to run ggplotly() for these 2 charts, rStudio return the message that geom_GeomLinerangeBC(), geom_GeomRectCS(), geom_GeomSegmentBC() has yet to be implemented in plotly.
The rendered chart doesn't have any data.

	require(tidyquant)
	require(quantmod)
	xtsPrices2 <- getSymbols('FBK.MI', src='yahoo',  auto.assign=FALSE)
	xtsPrices2 <- xtsPrices2["2017-07"]
	dfPrices <- data.frame(Date=index(xtsPrices2),coredata(xtsPrices2))
	names(dfPrices)<- c("Date", "Open", "High", "Low", "Close", "Volume", "Adjusted")

	symbol <-'FBK.MI'
	p <- ggplot(data=dfPrices, aes(x=Date, y=Close)) +
		labs(title = symbol, subtitle="", y="Closing Price", x="Date") 
	p <- p+ geom_candlestick(aes(open=Open, high=High, low=Low, close=Close), na.rm = TRUE,
						 color_up = "darkgreen", color_down = "darkred",  fill_up  = "darkgreen", fill_down  = "darkred"
		)
	p1 <- p + geom_barchart(aes(open=Open, high=High, low=Low, close=Close), na.rm = TRUE,
					  color_up = "darkgreen", color_down = "darkred", size = 1) 

	ggplotly(p)	
	ggplotly(p1)

[cpsievert]

Thanks, added to #566