R help - Oct 2006 - R function to compute kappa statistics for two vector

Dear R-user,

Did anybody know how to calculate the kappa statistics of two vectors for
the agreement? for example:

a<-c(0,1,0,0,1,0)

b<-c(0,1,1,0,0,1)

I know the percent of agreement is 3/6, but how to get the kappa?

	[[alternative HTML version deleted]]

Kappa() in library vcd
kappa2() in library irr
ckappa() in library psy
cohen.kappa() in library concord......

    Bruno
----- Original Message ----- 
From: "Philip He" <hydinghua at gmail.com>
To: <R-help at stat.math.ethz.ch>
Cc: "Rebecca Ding" <hua.ding at vanderbilt.edu>
Sent: Monday, October 02, 2006 5:53 PM
Subject: [R] R function to compute kappa statistics for two vector

> Dear R-user,
>
> Did anybody know how to calculate the kappa statistics of two vectors for
> the agreement? for example:
>
> a<-c(0,1,0,0,1,0)
>
> b<-c(0,1,1,0,0,1)
>
> I know the percent of agreement is 3/6, but how to get the kappa?
>
> [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help at stat.math.ethz.ch mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide 
> http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>

"Philip He" <hydinghua at gmail.com> writes:
> Dear R-user,
> 
> Did anybody know how to calculate the kappa statistics of two vectors for
> the agreement? for example:
> 
> a<-c(0,1,0,0,1,0)
> 
> b<-c(0,1,1,0,0,1)
> 
> I know the percent of agreement is 3/6, but how to get the kappa?
Multiple packages appear to have versions of Cohen's Kappa:

   irr, concord, psy, vcd, e1071

-- 
   O__  ---- Peter Dalgaard             ?ster Farimagsgade 5, Entr.B
  c/ /'_ --- Dept. of Biostatistics     PO Box 2099, 1014 Cph. K
 (*) \(*) -- University of Copenhagen   Denmark          Ph:  (+45) 35327918
~~~~~~~~~~ - (p.dalgaard at biostat.ku.dk)                  FAX: (+45) 35327907