powered by
gravity(Y, srcDstInd)
getSrcDstIndices
gravity.fit
data(cmu) srcDstInd <- getSrcDstIndices(cmu$A.full) estimate <- gravity(Y=cmu$Y[1:3,], srcDstInd=srcDstInd)
Run the code above in your browser using DataLab