以下是一个示例代码来编写一个函数，该函数用于指定要发送给ggplot的组/变量组合。

library(ggplot2)

# 定义函数
send_to_ggplot <- function(data, x, y, color) {
  # 创建ggplot对象
  p <- ggplot(data, aes_string(x = x, y = y, color = color)) +
    geom_point() +
    labs(x = x, y = y, color = color)
  
  # 返回ggplot对象
  return(p)
}

# 示例数据
data <- data.frame(x = c(1, 2, 3, 4, 5),
                   y = c(2, 4, 6, 8, 10),
                   color = c("red", "blue", "green", "red", "blue"))

# 调用函数
plot <- send_to_ggplot(data, "x", "y", "color")

# 显示图形
print(plot)

在这个例子中，我们首先加载ggplot2包。然后定义了一个名为send_to_ggplot的函数。这个函数接受四个参数：data表示数据集，x表示x变量名称，y表示y变量名称，color表示颜色变量名称。

在函数内部，我们使用aes_string函数来通过字符串传递变量名称。然后，我们创建了一个散点图，并使用labs函数设置x轴、y轴和颜色的标签。

最后，我们使用示例数据调用函数，并将返回的ggplot对象存储在plot变量中。然后，我们使用print函数显示图形。