R中没有轴的气泡图

Question

我想在R中创建这样的图表： http : //bl.ocks.org/mbostock/4063269

因此，只是一个没有轴的气泡图，气泡可以随机分散，并且只能通过size参数来表征。

我对在R中执行此操作很感兴趣，因为对我来说，熟悉的选项需要提供x，y和size变量。

Answer 1

这是一种使用bubbles （它基于htmlwidgets因此可以从R控制台，RStudio，R Markdown文档和Shiny应用程序中使用。）：

# devtools::install_github("jcheng5/bubbles")
library(bubbles)

bubbles(value = runif(26), label = LETTERS,
        color = rainbow(26, alpha=NULL)[sample(26)])

这使：

---

或者，您可以使用packcircles 。 从文档中：

功能circleProgressiveLayout通过将每个圆在外部切线与两个先前放置的圆相切，同时避免重叠，来排列一组以其大小表示的圆。 它改编自Peter Menzel用C语言编写的版本。

# install.packages("packcircles")
library(packcircles)
library(ggplot2)

p <- circleProgressiveLayout(runif(26))
d <- circleLayoutVertices(p)

ggplot(d, aes(x, y)) + 
  geom_polygon(aes(group = id, fill = id), 
               colour = "black", show.legend = FALSE) +
  geom_text(data = p, aes(x, y), label = LETTERS) +
  scale_fill_distiller(palette = "RdGy") +
  theme_void()

这使：