Usage
variog4(geodata, coords = geodata$coords, data = geodata$data,
uvec = "default", trend = "cte", lambda = 1,
option = c("bin", "cloud", "smooth"),
estimator.type = c("classical", "modulus"),
nugget.tolerance = 0, max.dist = NULL, pairs.min = 2,
bin.cloud = FALSE, direction = c(0, pi/4, pi/2, 3*pi/4),
tolerance = pi/8, unit.angle = c("radians", "degrees"),
messages.screen = TRUE, ...)