写一段R语言的代码 summarise保留原值

以下是一段R语言代码，使用summarise()函数保留原值：

library(dplyr)

# 创建一个数据框
df <- data.frame(x = c(1, 2, 3, 4, 5),
                 y = c(6, 7, 8, 9, 10))

# 使用summarise()函数保留原值
result <- df %>%
  summarise(x = x,
            y = y)

print(result)

上述代码中，我们使用dplyr包中的summarise()函数来对数据框df进行总结。在summarise()函数中，我们指定了要保留的变量x和y，并将它们的值设置为原始变量x和y的值。最后，使用print()函数打印结果。