GGfan support

Please briefly describe your problem and what output you expect. If you have a question, please don't use this form, but instead ask on the community forum http://community.plot.ly/c/api/r or stackoverflow http://stackoverflow.com.

Please include a minimal reprex. The goal of a reprex is to make it as easy as possible for me to recreate your problem so that I can fix it. If you've never heard of a reprex before, start by reading https://github.com/tidyverse/reprex#readme, and follow the advice further down the page. Do NOT include session info unless it's explicitly asked for, or you've used reprex::reprex(..., si = TRUE) to hide it away.

Delete these instructions once you have read them.

Brief description of the problem

Hi, please could I request plotly support for the ggfan package.

I'm trying to build a plotly with ggfan and i get the following error:
Warning in geom2trace.default(dots[[1L]][[1L]], dots[[2L]][[1L]], dots[[3L]][[1L]]) :
geom_GeomIntervalPoly() has yet to be implemented in plotly.
If you'd like to see this geom implemented,
Please open an issue with your example code at
https://github.com/ropensci/plotly/issues

insert reprex here

library(shiny)
library(shinytableau)
library(promises)
library(shinyvalidate)
library(ggplot2)
library(ggfan)
library(plotly)

p<- ggplot(test, aes(x=tick, y=value))+
geom_fan(intervals = c(0.2,0.5, 0.8, 0.95))+
scale_fill_steps(low = "#EF4A81",
high = "#fcdbe6",
guide = "colourbar",
aesthetics = "fill")

ggplotly(p)

test.csv

Start by reproducing the provided ggfan example with the linked test.csv and inspect the geom2trace.default warning for GeomIntervalPoly. Determine where plotly.R handles ggplot geoms and what output the ggfan geom should produce. Done means ggplotly(p) supports geom_fan without the unimplemented-geom warning.