Revision 899d6ebe6d6f86090ba8c139b6c970b4c326e5b0 authored by Edzer Pebesma on 16 September 2011, 00:00:00 UTC, committed by Gabor Csardi on 16 September 2011, 00:00:00 UTC
1 parent 8c9f4d1
Raw File
print.variogramCloud.R
# $Id: print.variogramCloud.q,v 1.4 2007-10-18 10:13:13 edzer Exp $

as.data.frame.variogramCloud = function(x, row.names, optional, ...) {
	.BigInt = attr(x, ".BigInt")
	x$left = x$np %% .BigInt + 1
	x$right = x$np %/% .BigInt + 1
	x$np = NULL
	class(x) = "data.frame"
	x
}

print.variogramCloud <- function (x, ...) {
    print(as.data.frame(x), ...)
}
back to top