df1 <- subset(iris, Species == "setosa")
df2 <- subset(iris, Species == "versicolor")
df3 <- subset(iris, Species == "virginica")
bind_source(list(df1, df2, df3),
s_l = "Sepal.Length",
s_w = "Sepal.Width",
p_l_setosa = c("Petal.Length", NA, NA),
p_l_virginica = c(NA, NA, "Petal.Length")
) %>%
head()
Run the code above in your browser using DataLab