# Example 1 fills interior of Simplex Lattice Designdes<-SLD(3,3)DesignPoints(des)des2<-Fillv(3,des)DesignPoints(des2)# Example 2 fills interior of Simplex Centroid Designdes<-SCD(4)Fillv(4,des)# Example 3 fills interior of Extreme vertices designev<-Xvert(3,uc=c(.1,.1,1.0),lc=c(0,0,0),ndm=1)ev2<-Fillv(3,ev)