Сохранение всплывающего текста javascript в переменную R или в файл

Question

Этот вопрос является продолжением этого поста .

Я строю тепловую карту, используя R plotly:

set.seed(1)
df <- reshape2::melt(matrix(rnorm(100*20),100,20,dimnames = list(paste0("G",1:100),paste0("S",1:20))))

library(plotly)
library(dplyr)
plot_ly(z=c(df$value),x=df$Var2,y=df$Var1,colors=grDevices::colorRamp(c("darkblue","gray","darkred")),type="heatmap",colorbar=list(title="Scaled Value",len=0.4)) %>%
  layout(yaxis=list(title=NULL),xaxis=list(tickangle=90,tickvals=10,ticktext="X-Label"))

Как видите, plotly показывает не все тики по оси Y. Из этого github опубликована проблема, я знаю, что:

plot_ly(z=c(df$value),x=df$Var2,y=df$Var1,colors=grDevices::colorRamp(c("darkblue","gray","darkred")),type="heatmap",colorbar=list(title="Scaled Value",len=0.4)) %>%
  layout(yaxis=list(title=NULL),xaxis=list(tickangle=90,tickvals=10,ticktext="X-Label")) %>% 
  htmlwidgets::onRender(
    "function(el, x) {
       alert(el._fullLayout.yaxis._vals.map(function(i) { return i.text; }));
    }"
  )

в моем браузере появляется окно с метками y-tick.

У меня вопрос, есть ли способ сохранить или передать этот список в переменную R или даже сохранить его в файл, так что это можно сделать автоматически, а не в интерактивном режиме?