Boa noite pessoal,

Estava tentanto usar um objeto SpatialPolygonsDataFrame contido em um arquivo shapefile dentro do pacote spatstat,
bom fiz segundo o exemplo do material Handling shapefiles in the spatstat package do Baddeley, mas não consegui plotar o objeto owin criado, fiz:

require(maptools)
require(spatstat)
x <- readShapeSpatial("mtaremanne92.shp")
class(x)
[1] "SpatialPolygonsDataFrame"
attr(,"package")
[1] "sp"
cregions <- slot(x, "polygons")
cregions <- lapply(cregions, function(x) {SpatialPolygons(list(x))})
cwindows <- lapply(cregions, as.owin)
Checking 1 polygons...1.
done.
Checking 3 polygons...1, 2, 3.
done.
Checking for cross-intersection between 3 polygons...1, 2.
done.
plot(cwindows)
Erro em xy.coords(x, y, xlabel, ylabel, log) :
'x' is a list, but does not have components 'x' and 'y'

Alguem que já tenha utilizado shapfiles dentro do spatstat saberia me dar um help,
Obrigado,

Alexandre dos Santos
Engenheiro Florestal, MSc.
Universidade Federal de Lavras
Departamento de Entomologia
Laboratório de Entomologia Florestal
Caixa Postal 3037
37200-000 - Lavras/MG
Fone: +55 (35) 3829-5122