Displaying 1 result from an estimated 1 matches for "totalgrids".
2015 Mar 03
2
Asssistance
...<- factor(bcidata$IDgrid)
levels(bcidata$IDgrid) <- seq_along(levels(bcidata$IDgrid))
bcidata$count <- ave(bcidata$PX, bcidata$IDgrid, FUN = length)
aggregate <- aggregate(bcidata$PX,bcidata[,c("Xgrid","Ygrid","IDNgrid")],
FUN = length)
Totalgrids <- length(levels(bcidata$IDgrid))
Occupiedgrids <- length(aggregate$IDNgrid)
sum <- sum(aggregate$x)
TotalArea <- 500000
Area <- (1000/i*500/j)
Occupancy <- (Occupiedgrids/Totalgrids)
Mean <- length(bcidata$Latin)/(Occupiedgrids)
Variance <...