将表中的结果写入R中的一行

我做了一个Kappa统计{Asbio}

library("asbio")
reference<-c("hi","low","low","hi","low","med","med")
class1<-c("hi","hi","low","hi","med","med","med")
Kappa(class1,reference)

我想将此结果保存到表中，如下所示：

ttl_agreement  user_accuracy_hi user_accuracy_low user_accuracy_med  ... etc. 
 71.42857            100.0           100.0             100           

所以“取消注册”我的结果并将它们放在一个表行中（使用列名）。我想重复卡帕大概100次。也许我的问题很琐碎，但我真的找不到答案。。。提前感谢尝试

取消列表（Kappa（class1，reference））

，它提供了一个简单的（命名的）向量，如果您愿意，可以使用

as.table（）

轻松地将其强制到表中。这是因为

Kappa（）

ttl_agreement  user_accuracy_hi user_accuracy_low user_accuracy_med  ... etc. 
 71.42857            100.0           100.0             100