在R中使用带有可变列名

Question

我想使用spread函数，但列名会根据函数而改变。我尝试过使用select（）的选项，但无济于事。以下是我失败的尝试：

use_spread <- function(df, colname1, colname2)
{
  ...
  out = df %>% spread(colname1, colname2)
  out = df %>% spread(as.name(colname1), as.name(colname2))
  out = df %>% spread(match(c(colname1, colname2), colnames(.)))
  ...
}

提前致谢。