Hello,

I've still a problem with script written in ASDAR book, and more precisely
with sapply function, as you can see in the script below. I've try to
decompose the script in several sentences, but it doesn't work (I think I
don't understand what is written in the whole sentence).

Someone can help me?

 

Sincerely.

 

 

lns<-slot(auck_shore,"lines")

> aucksap<-sapply(lns,length)

> table(aucksap)

aucksap

 1 

80 

>
islands_auck<-sapply(lns,function(x){crds<-slot(slot(x,"Lines")[[1]],"coords
")identical(crds[1,],crds[nrow(crds),])})

Error: unexpected symbol in
"islands_auck<-sapply(lns,function(x){crds<-slot(slot(x,"Lines")[[1]],"coord
s")identical"

 

 

 

Thomas AUBINEAU

Responsable technique GDS 35

ZA Atalante Champeaux

35042 RENNES CEDEX

0223482600 / 0623258789

 


	[[alternative HTML version deleted]]

