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 <virgilio.gomez@uclm.es>

Kepada: ROKHANA dwi bekti <groo_jgroo@yahoo.com> 
Cc: "r-sig-geo@r-project.org" <r-sig-geo@r-project.org> 
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]]

