Dear Virgilio,

It's true. It's about the source code for the function.
Such us code for tango.stat (in DCLuster package) :


tango.stat<-function(data, listw, zero.policy=FALSE)
{
    p<-scale(data$Expected, center=FALSE, scale=sum(data$Expected))
    r<-scale(data$Observed, center=FALSE, scale=sum(data$Observed))

    rp<-r-p
    T<-lag.listw(listw, rp, zero.policy = zero.policy)
    T<-t(rp)%*%T
    return(T)
}

Thank you


Dari: Virgilio Gómez-Rubio <[email protected]>

Kepada: ROKHANA dwi bekti <[email protected]> 
Cc: "[email protected]" <[email protected]> 
Dikirim: Kamis, 11 Oktober 2012 17:14
Judul: Re: [R-sig-Geo] tango.test
 
Hi,

El jue, 11-10-2012 a las 04:09 +0800, ROKHANA dwi bekti escribió:
> Dear All,
> I will testing of general spatial cluster by Tango (in package DCluster).
> But, I haven't find the script of tango.test.

What do you mean by the script? The source code for the function? The
example?

Cheers,

Virgilio
        [[alternative HTML version deleted]]

_______________________________________________
R-sig-Geo mailing list
[email protected]
https://stat.ethz.ch/mailman/listinfo/r-sig-geo

Reply via email to