R/Lchs.R

Defines functions Lchs

Documented in Lchs

Lchs <- function(x, ...) {
if (!inherits(x, "hotspots")) 
	stop("use only with \"hotspots\" objects")
	x.s <- summary(x)
	x.Lc <- Lc(x.s$x)
	plot(x.Lc, ...)
	points(1-x.s$percent_phs*0.01,1-x.s$percent_phs_sum*0.01, cex = 2,pch = 16) }

Try the hotspots package in your browser

Any scripts or data that you put into this service are public.

hotspots documentation built on May 1, 2019, 8:19 p.m.