Topic: Spatial
Topic Description:
Functions for calculating Ripley's K from CTFS R Analytical Tables, many routines for quadrat-based calculations. and calculations of wavelet variance.
File: spatial/quadfunc.r
| View File Source | Download File | No help file available |
Function: rowcol.to.index
Function Description: rowcol.to.index
None given.Function Arguments:
| Argument | Default Value |
|---|---|
| rowno | |
| colno | |
| gridsize | 20 |
| plotdim | c(1000,500) |
Function Source:
rowcol.to.index=function(rowno,colno,gridsize=20,plotdim=c(1000,500))
{
badrc=(rowno<=0 | colno<=0 | rowno>plotdim[2]/gridsize | colno>plotdim[1]/gridsize)
rowno=rowno-1
colno=colno-1
maxrow=floor(plotdim[2]/gridsize)
index=colno*maxrow+rowno+1
if(length(badrc[badrc>0])) index[badrc]=NA
return(index)
}
{
badrc=(rowno<=0 | colno<=0 | rowno>plotdim[2]/gridsize | colno>plotdim[1]/gridsize)
rowno=rowno-1
colno=colno-1
maxrow=floor(plotdim[2]/gridsize)
index=colno*maxrow+rowno+1
if(length(badrc[badrc>0])) index[badrc]=NA
return(index)
}