powered by
natom(x, ...)
x
natom.coords
coords
n <- 2 x <- coords(1:n, 1:n, 1:n) natom(x) n <- 3 x <- coords(1:n, 1:n, 1:n) natom(x)
Run the code above in your browser using DataLab