從 ggplotly 圖例中刪除括號

Question

我在這里找到了這個例子，它提供了一種完美的方式來擺脫 ggplotly 添加到圖例中的額外術語。

我的問題是解決方案中的代碼刪除了逗號后的所有內容,而我有一個實際的逗號是我的圖例，其格式為DIC, Spliced

代碼是：

for (i in 1:length(myplot$x$data)){
    if (!is.null(myplot$x$data[[i]]$name)){
        myplot$x$data[[i]]$name =  gsub("\\(","",str_split(myplot$x$data[[i]]$name,",")[[1]][1])
    }
}

我原來的plot有這樣的傳說：

應用代碼后，我在我的傳說中失去了我的Spliced/Uspliced術語

Answer 1

所以plotly總是把新的圖例變成(orignal_legend,1) (Weird)。 總是,1)嗎？ 或可以是,2)或任何其他數字。 我不知道。

如果您的原始圖例是(DIC, Spliced, 1)它將變為((DIC, Spliced, 1), 1)和plotly 。 因此，您必須從圖例中刪除開頭的圓括號和結尾的,1) 。 用gsub試試這個正則表達式：

for (i in 1:length(myplot$x$data)){
  if (!is.null(myplot$x$data[[i]]$name)){
    myplot$x$data[[i]]$name = gsub('^\\(|,\\d+\\)$', '', myplot$x$data[[i]]$name)
  }
}

如前所述，我不確定它是否總是,1)或也可以是,2) ，所以為了更安全，我使用了\\d+它將刪除字符串末尾的任何數字.