缩放“画图”时调整几何尺寸

Question

ggiraph包扩展了ggplot2以添加交互性。其中一项功能是能够放大一个地块，例如使用以下代码：

library(ggplot2)
library(ggiraph)

data(mtcars)

mtcars$model <- rownames(mtcars)

gg <- ggplot(mtcars, aes(x = mpg, y = disp)) +
  geom_point_interactive(aes(color = as.factor(cyl),
                             tooltip = model))

girafe(ggobj = gg) %>%
    girafe_options(opts_zoom(max = 5),
                   opts_tooltip(use_fill = TRUE))

预览时，可以通过单击放大镜和滚动来放大图表。当用户缩放时，点会增大，但是工具提示保持相同的大小。

是否可以在缩放时调整几何尺寸(例如点半径或线厚)？

这可能有很多有用的理由，但我特别考虑的是过度绘制--我有一个密集的数据集，但是放大没有帮助，因为这些点仍然相互覆盖。

我之所以使用ggiraph，是因为它是对ggplot2的简单扩展，但是如果有类似的包，我将向其他解决方案开放。

Answer 1

首先，您的代码是不可复制的，因为model不可用，所以我假设您已将mtcars的行名分配给向量model。

我不认为您可以在ggiraph中做到这一点，但是在plotly中很简单:您可以生成一个ggplot对象，并使用plotly::ggplotly()简单地将其转换为plotly对象。

对于问题中的mtcars示例，下面的技巧如下：

library(plotly)

data(mtcars)

# generate ggplot object
gg <- ggplot(mtcars) + 
  geom_point(aes(x = mpg, y = disp, col  = as.factor(cyl), text = rownames(mtcars))) 

# convert to plotly object
ggplotly(gg, tooltip = "text")

结果看起来像一个ggplot2，但是是交互式的，并且不受缩放问题的影响。您可以在查看器中使用它，以支持HTML小部件的输出格式包含它，或者在浏览器中查看它。

​

​

由于上面仅仅是截图，所以我将输出上传到了plot.ly上的帐户。你可以找到它，这里，并玩它。

我希望这能帮到你!