A<-c(-1.22,-2.33); B<-c(2.55,3.75,4)
is.point(A)
is.point(A,2)
is.point(A,1)
is.point(A,3)
is.point(B)
is.point(B,3)
Dt<-rbind(A,B[1:2])
is.point(Dt)
is.point(as.vector(Dt),4)
lis<-list(a=A,b=B)
is.point(lis)
dat.fr<-data.frame(a=A,b=B[1:2])
is.point(dat.fr)
is.point(c("a","b"))
Run the code above in your browser using DataLab