我可以通过使用for（）的函数运行数据集列表吗？

Question

我正试图找到办法做两件事。

1. 获取数据集并根据其在特定变量中的值将其分成单个数据集。

2. 使用for（）或其他语句通过函数运行每个数据集。

这是我现在想做的非常简单的版本。

x <- c("Red", "Red", "Red", "Orange", "Blue", "Orange", "Red", "Blue")
y <- c(2,3,1,4,2,6,4,3)
z <- df(x,y) 

Red <- z[z$x == "Red",]
Blue <- z[z$x == "Blue",]
Orange <- z[z$x == "Orange",]

Function1 <- function(x){
  a <- mean(x$y)
  return(a)}

Mean1 <- Function1(Red)
Mean2 <- Function1(Blue)
Mean3 <- Function1(Orange)

Table <- rbind(Mean1, Mean2)
Table <- rbind(Table, Mean3)

Table

我想简化这一过程，为每个独特的“颜色”自动创建数据集，然后通过函数运行每个“颜色”数据集。

感谢任何反馈，谢谢！