如何在不加載包的情況下使用`ggplot2`的功能？

Question

使用ggplot2 ，有時我們需要使用多個函數來繪制數據：

library("ggplot2")
p <- ggplot(mpg) + 
  geom_bar(aes(x = .data$drv)) + 
  coord_flip()

在不加載整個ggplot2包的情況下執行此繪圖的另一種方法是：

p <-ggplot2::ggplot(ggplot2::mpg) + 
   ggplot2::geom_bar(ggplot2::aes(x = .data$drv)) + 
   ggplot2::coord_flip()

我們如何在不必通過library("ggplot2")加載包或不必為每個函數編寫ggplot2::情況下繪制此圖？

Answer 1

withr::with_package臨時加載一個包。

p <- withr::with_package("ggplot2", {
  ggplot(mpg) + 
    geom_bar(aes(x = drv)) + 
    coord_flip()
})