r - 使用 cross 和 .names 进行变异，如何列出列

Question

我正在尝试使用{fn}列的编号来命名跨函数的输出。我有这个命令的想法，但不工作：

iris %>% 
  mutate(
    across(Sepal.Length:Petal.Width, list(var = ~ . -1),
           .names = "{fn}{1:4}")
  )

不幸的是，这不起作用：

Error: Problem with `mutate()` input `..1`.
x Variables must be length 1 or 5
ℹ Input `..1` is `across(Sepal.Length:Petal.Width, list(var = ~. - 1), .names = "{fn}{1:5}")`

我希望输出我会得到 4 个新列，其名称包括var1、和。var2var3var4