Function

コメント・参照等
  • ggAcfをplotly描画に変換する関数

FUN = f_plotly_acf_from_ggplot.r
function (obj0, col_x = 2) 
{
    titlefont <- list(size = 13, family = "Meiryo", color = "black")
    tickfont <- list(size = 13, family = "Meiryo", color = "black")
    maintitle <- colnames(obj0)[col_x]
    ggplotly(ggAcf(x = obj0[, col_x], plot = T)) %>% layout(showlegend = F) %>% layout(plot_bgcolor = "rgba(0,0,0,0)") %>% layout(paper_bgcolor = "rgba(0,0,0,0)") %>% style(hoverinfo = "x+y") %>% layout(title = maintitle, titlefont = titlefont)
}