powered by
Define a rectangular outline
morphomapRectangle(l = 1, h = 1, n = 1000)
mat matrix with coordinates
numeric: length of the rectangle
numeric: height of the rectangle
numeric: number of points along the outline
Antonio Profico, Luca Bondioli, Pasquale Raia, Paul O'Higgins, Damiano Marchi
extsec<-morphomapRectangle(10,6,100) intsec<-morphomapRectangle(8,4,100) plot(extsec,asp=1,type="l") points(intsec,type="l",col=2)
Run the code above in your browser using DataLab