Description Usage Arguments Examples
sc coord
1 2 3 4 5 6 7 8 |
x |
input object |
... |
arguments passed to methods |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | irreg_data <- c("chorley", "clmfires", "demopat", "gordon", "gorillas", "humberside",
"murchison", "nbfires", "urkiola", "vesicles")
## all are ppp, but murchison "solist" "anylist" "listof" "list"
library(spatstat)
data(list = irreg_data, package = "spatstat")
for (i in seq_along(irreg_data)) {
x <- get(irreg_data[i])
#plot(x, main = irreg_data[i])
# title(sub = paste(class(x), collapse = " "))
if (inherits(x, "solist")) {
next;
}
#print(sc_coord(as.owin(x)))
#print(sc_path(as.owin(x)))
#print(sc_object(as.owin(x)))
print(sc_object(x))
}
x <- as.owin(x)
sc_path(x)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.