# NOT RUN {
d <- arc.open(system.file("extdata", "ca_ozone_pts.shp",
package="arcgisbinding"))
# from arc.dataset
info <- arc.shapeinfo(d)
info$WKT # print dataset spatial reference
# from arc.shape
df <- arc.select(d, 'ozone')
arc.shapeinfo(arc.shape(df))
# }
Run the code above in your browser using DataLab