R Plotly添加图像水印

Question

我想将 image/watermark 添加到双 y 轴图，但不知何故我的代码不起作用.....这怎么可能？它没有错误，但没有添加图像

df <- data.frame(x = 1:50,
                 y1 = c(20:5,6:10,9:3,4:20, 19:15),
                 y2 = c(100:115,200:204,50:44,4:20, 66:62))

还有我的代码

plot_ly(df) %>% 
  add_lines(type = 'scatter', mode = "lines", 
            name = "test", 
            x = ~x, y = ~y1,
            line = list(color = '#999999'),
            hoverinfo = "text",
            text = ~paste(round(y1, 1), x))  %>%
  add_lines(type = 'scatter', mode = "lines", 
            name = "test", yaxis = 'y2',
            x = ~x, y = ~y2,
            line = list(color = '#CC79A7'),
            hoverinfo = "text",
            text = ~paste(round(y2, 1), x)) %>%
  #layout
  layout(title = "test",
         xaxis = list(titel = "Date", 
                      rangeslider = list(thickness = 0.05)),
         yaxis = list(side = 'left', title = 'test', 
                      showgrid = F, zeroline = F, type = "log",
                      showline = T),
         images = list(source = "https://rstudio.com/wp-content/uploads/2018/10/RStudio-Logo.png",
                       xref = "paper",
                       yref = "paper",
                       xanchor = "left", 
                       yanchor = "bottom",
                       x= 4,
                       y=4,
                       sizex = 5,
                       sizey = 5,
                       opacity = 0.8),
         yaxis2 = list(side = 'right', overlaying = "y", 
                       title = 'test', 
                       showgrid = F, zeroline = F, 
                       showline = T))

Answer 1

问题是您无法访问 Rstduio-logo.png。

创建 www 文件夹
在这个 www 文件夹中放一个 .png 假设我称之为 test.png
然后简单地：

layout(images = list(source = "test.png"))

R Plotly添加图像水印

R Plotly add image watermark

watermark

r

plotly