应用于数据集 R 的函数

Question

下面是标记为“A”和“C”的两个数据框。 我创建了一个函数，它可以为数据帧取前 5 行，并希望将其应用到数据帧 C。但是，它只为 A 复制它。我将如何将此函数仅应用于 C。 谢谢！

    L3 <- LETTERS[1:3]
    fac <- sample(L3, 10, replace = TRUE)
    (d <- data.frame(x = 1, y = 1:10, fac = fac))
    ## The "same" with automatic column names:
    A<-data.frame(1, 1:10, sample(L3, 10, replace = TRUE))

    L3 <- LETTERS[7:9]
    fac <- sample(L3, 10, replace = TRUE)
    (d <- data.frame(x = 1, y = 1:10, fac = fac))
    ## The "same" with automatic column names:
    C<-data.frame(1, 1:10, sample(L3, 10, replace = TRUE))

    function_y<-function(Data_Analysis_Task) {
       sample2<-head(A, 5)
       return(sample2)
    }

    D<-function_y(C)

Answer 1

我们还需要在函数内部传递相同的参数

function_y <- function(Data_Analysis_Task) {
      head(Data_Analysis_Task, 5)

 }

 D <- function_y(C)

---

如果我们使用head(A, 5) ，在函数内部，它首先在函数 env 中查找对象 'A'，然后如果没有找到，则查看父 env，依此类推，直到找到全局环境中的对象“A”。 因此，每次调用该函数时，它都会返回相同的head of 'A' 输出