bubble_blow圆形包装图，R语言tastypie包简易饼

bubble_blow圆形包装图

bubble_blow圆形包装图1.png bubble_blow圆形包装图2.png

# Wed Sep 08 00:53:06 2021 edit
# 字符编码：UTF-8
# R 版本：R 4.1.1 x64 for window 11
# cgh163email@163.com
# 个人笔记不负责任，拎了个梨🍐🍈
#.rs.restartR()
require(tastypie)

rm(list = ls());gc()

example <- data.frame(
  c("This", "Is", "Just", "An", "Example"),
  c(2.9, 6.9, 4.20, 13.12, 6.66)
)
bubble_blow(
  data = example,
  template = "bub1",
  perc = "below",
  title = "Example1"
)
dev.copy(png, "bubble_blow圆形包装图.png");dev.off()

example2 <- tibble::tibble(
  c("cat 1", "cat2", "cat3", "cat4", "cat5", "cat6", "cat7", "cat8", "cat9"),
  c(324, 432, 499, 291, 750, 836, 314, 133, 372)
)
bubble_blow(
  data = example2,
  template = "bub2",
  perc = "right",
  title = "Ex2"
)

dev.copy(png, "bubble_blow圆形包装图2.png");dev.off()