为新行中的每行标识分数 p您的意思是类似于colSums（x[x$p%in%y，-1]）/nrow（x）？感谢您的回复，您的回答与此相同，但结果应反映为新行或转置为新列后。我们也可以把这个分数改成百分比。很好，我把它作为x$newcol添加到新的行或列中。_R

为新行中的每行标识分数 p您的意思是类似于colSums（x[x$p%in%y，-1]）/nrow（x）？感谢您的回复，您的回答与此相同，但结果应反映为新行或转置为新列后。我们也可以把这个分数改成百分比。很好，我把它作为x$newcol添加到新的行或列中。

为新行中的每行标识分数 p您的意思是类似于colSums（x[x$p%in%y，-1]）/nrow（x）？感谢您的回复，您的回答与此相同，但结果应反映为新行或转置为新列后。我们也可以把这个分数改成百分比。很好，我把它作为x$newcol添加到新的行或列中。,r,R,为新行中的每行标识分数 p您的意思是类似于colSums（x[x$p%in%y，-1]）/nrow（x）？感谢您的回复，您的回答与此相同，但结果应反映为新行或转置为新列后。我们也可以把这个分数改成百分比。很好，我把它作为x$newcol添加到新的行或列中。所以你的数据框总是对称的，对吗？是的，我知道了，谢谢。 p <- c("p1","p2","p3","p4") a <- c(0,1,1,1) b <- c(1,0,1,1) c <- c(1,0,1,1) d <

为新行中的每行标识分数

p您的意思是类似于colSums（x[x$p%in%y，-1]）/nrow（x）？感谢您的回复，您的回答与此相同，但结果应反映为新行或转置为新列后。我们也可以把这个分数改成百分比。很好，我把它作为x$newcol添加到新的行或列中。所以你的数据框总是对称的，对吗？是的，我知道了，谢谢。
p <- c("p1","p2","p3","p4")
a <- c(0,1,1,1)
b <- c(1,0,1,1)
c <- c(1,0,1,1)
d <- c(1,1,0,1)
x <- data.frame(p,a,b,c,d)

y <- c("p1", "p3", "p4")