Psych 函数 describe() with Embedded Vector Returns Var 中的错误

Psych function describe() with Embedded Vector Returns Error in Var

我想使用 describe() 传递嵌入在其他向量中的向量,以便我可以在 for 循环中使用该函数。 我有以下数据,其中包含一组学生的成绩。 我想获得 130 名学生被分为 5 个不同组的描述性统计数据,因此我为每个组创建一个子集。

pr3 <- read.csv("data.csv", head = T, sep = ";")

G1A <- subset(pr3, group == "1A")
G1B<- subset(pr3, group == "1B")


现在按如下方式调用 describe() 非常有效:

describe(G1A)

但是,将子集分组到向量 names 并将索引 names 传递给 describe() 将不起作用:

names <- c(G1A, G1B)
describe(names[1])

Error in var(if (is.vector(x) || is.factor(x)) x else as.double(x), na.rm = na.rm) : 
  is.atomic(x) is not TRUE
In addition: Warning message:
In mean.default(x, na.rm = na.rm) :
  argument is not numeric or logical: returning NA
>

我怎样才能让它发挥作用?

您不能将 subsets/data 帧放在一个矢量中并以这种方式调用它们。

如果您调用 str(names[1]) 查看向量的结构,您就会明白为什么它不起作用。

相反,您可能希望将两个数据框放在一个列表中,以便用您的第二行调用它们。像这样:

names <- list(G1A, G1B)
describe(names[1])