---------- ---------- ---------- ---------- ---------- ---------- ---------- ---------- Some commands that can be useful for making some figures. We recall that the rectangle of millimeter paper shown below is obtained with mmpaper1() (other paper are obtained with mmpaper2/3) In the same scale I can draw circles, by CiRcLe(n) [in the n^ quadrant), and graduated segments, in a given direction, by dMmM or (without opening a new window) DMmM. Here's what I can get by putting together the images produced with CiRcLe(1) CiRcLe(2) and mmpaper1() # Radius of lenght 50 and inclination 30° dMmM(30) text(25,10,"30°") POINT(27,31,"red") inclination(0,0, 27,31) # 48.94519 # I obtain the figure below on the left # Radius of inclination 48.94519° DMmM(48.94519) # I "read" the distance is about 41 mm # I calculate it point_point(0,0, 27,31) # 41.10961 # OK POINT(27,31,"red") text(30,27,"48.95°") mmpaper1() DMmM(30) DMmM(48.94519) circl(0,0, 50, "blue") CiRcLe(3) DMmM(180) DMmM(180+45) DMmM(180+90) # # I can put millimeter card on the background of a chart. # Example. # # Employment rate in Italy x <- c(1861,1871,1881,1901,1911,1921,1931,1936,1951,1961,1971,1981) y <- c(59,57,54,50,48,47,46,45,43,40,37,45) Plane(1860,1990, 0,60) polyl(x,y,"blue"); POINT(x,y,"brown") # # x varies by 1990-1860 = 130, y by 60-0 = 60 # I use a chart 130 mm × 60 mm: Planew(1860,1990, 0,60) MmPaper(130, 60) polyl(x,y,"blue"); POINT(x,y,"black") # # I can resize the window to see square "squares". Other examples of use