r - mapply で複数のプロットを作成する

Question

次のデータフレームを作成しましたdf：

V1 <- 1:10
V2 <- 11:20
V3 <- 21:30
V4 <- 31:40
df <- data.frame(V1,V2,V3,V4)

var1また、引数およびに基づいて単純な散布図を作成する関数も作成しましたvar2。

 ScatterPlot <- function(var1, var2) {
     ggplot(data = df,
     aes(x = var1, y = var2)),
     environment = environment() +
     geom_point()
 }

次の変数の組み合わせに対して 2 つの特定の散布図のみが必要です:v1-v2とv3-v4.

mapplyここでは、さまざまな変数の組み合わせをループするのが便利だと思いました。

mapply(FUN = ScatterPlot,
       var1 = c(V1, V3),
       var2 = c(V2, V4))

私はちょうど2つのプロットを期待していましたが、これは私が代わりに得たものです: