Diferenças
Aqui você vê as diferenças entre duas revisões dessa página.
| software:art:curso:bodmin [2007/12/12 00:52] – criada paulojus | software:art:curso:bodmin [2007/12/12 00:53] (atual) – paulojus | ||
|---|---|---|---|
| Linha 11: | Linha 11: | ||
| require(splancs) | require(splancs) | ||
| data(bodmin) | data(bodmin) | ||
| - | < | + | </code> |
| getting to know the data | getting to know the data | ||
| Linha 18: | Linha 18: | ||
| polymap(bodmin$poly) | polymap(bodmin$poly) | ||
| pointmap(as.points(bodmin), | pointmap(as.points(bodmin), | ||
| - | < | + | </code> |
| \\ | \\ | ||
| \\ | \\ | ||
| Linha 27: | Linha 27: | ||
| <code R> | <code R> | ||
| ker <- kernel2d(as.points(bodmin), | ker <- kernel2d(as.points(bodmin), | ||
| + | </ | ||
| plot splancs results | plot splancs results | ||
| Linha 33: | Linha 34: | ||
| polygon(bodmin$poly, | polygon(bodmin$poly, | ||
| pointmap(as.points(bodmin), | pointmap(as.points(bodmin), | ||
| - | < | + | </code> |
| \\ | \\ | ||
| Linha 43: | Linha 44: | ||
| con = openConn() | con = openConn() | ||
| con | con | ||
| - | < | + | </code> |
| how to delete an existing database (if already exists) | how to delete an existing database (if already exists) | ||
| Linha 49: | Linha 50: | ||
| if(any(showDbs(con)==" | if(any(showDbs(con)==" | ||
| deleteDb(con, | deleteDb(con, | ||
| - | < | + | </code> |
| creating a new database | creating a new database | ||
| Linha 55: | Linha 56: | ||
| bod = createDb(con, | bod = createDb(con, | ||
| bod | bod | ||
| - | < | + | </code> |
| aRT uses " | aRT uses " | ||
| Linha 67: | Linha 67: | ||
| ## | ## | ||
| l_points <- importSpData(bod, | l_points <- importSpData(bod, | ||
| - | < | + | </code> |
| checking the status of the database | checking the status of the database | ||
| <code R> | <code R> | ||
| bod | bod | ||
| - | < | + | </code> |
| Note: the importSpData() command above encapsulates several steps | Note: the importSpData() command above encapsulates several steps | ||
| Linha 86: | Linha 86: | ||
| addPolygons(l_pol, | addPolygons(l_pol, | ||
| createTable(l_pol, | createTable(l_pol, | ||
| - | < | + | </code> |
| c. Preparing and transfering the image (raster) | c. Preparing and transfering the image (raster) | ||
| Linha 97: | Linha 97: | ||
| l_kernel <- createLayer(bod, | l_kernel <- createLayer(bod, | ||
| addRaster(l_kernel, | addRaster(l_kernel, | ||
| - | < | + | </code> |
| Linha 104: | Linha 104: | ||
| l_splancs <- createLayer(bod, | l_splancs <- createLayer(bod, | ||
| addRaster(l_splancs, | addRaster(l_splancs, | ||
| - | < | + | </code> |
| Linha 110: | Linha 110: | ||
| <code R> | <code R> | ||
| bod | bod | ||
| - | < | + | </code> |
| **//open and inspect the database in terraView!!!// | **//open and inspect the database in terraView!!!// | ||
| Linha 123: | Linha 123: | ||
| fullgrid(g)=TRUE | fullgrid(g)=TRUE | ||
| plot(pol, add=T, lwd=2) | plot(pol, add=T, lwd=2) | ||
| - | < | + | </code> |
| Ploting the DB layers -- plot from aRT | Ploting the DB layers -- plot from aRT | ||
| Linha 130: | Linha 130: | ||
| plot(l_points, | plot(l_points, | ||
| plot(l_pol, add=T, lwd=2) | plot(l_pol, add=T, lwd=2) | ||
| - | < | + | </code> |
| \\ | \\ | ||
| Linha 140: | Linha 140: | ||
| th <- createTheme(l_kernel, | th <- createTheme(l_kernel, | ||
| setVisual(th, | setVisual(th, | ||
| - | < | + | </code> |
| Linha 150: | Linha 150: | ||
| th <- createTheme(l_splancs, | th <- createTheme(l_splancs, | ||
| setVisual(th, | setVisual(th, | ||
| - | < | + | </code> |
| checking the sattus of the data base | checking the sattus of the data base | ||
| <code R> | <code R> | ||
| bod | bod | ||
| - | < | + | </code> |
| \\ | \\ | ||
| \\ | \\ | ||
| **// open and visualise the database in terraView!!! //** | **// open and visualise the database in terraView!!! //** | ||
