xyjoonis

  lapsed=read.table("http://www.tlu.ee/~jaagup/andmed/muu/5klasskabe.txt", 
                     header=TRUE, sep=",")
  lapsed

##      eesnimi pikkus mass sugu   kabe
## 1       Juku    170   45    m    jah
## 2       Kati    160   35    n    jah
## 3       Mati    160   72    m natuke
## 4      Madis    165   53    m     ei
## 5       Mati    163   60    m     ei
## 6     Katrin    165   43    n natuke
## 7       Siim    141   38    m     ei
## 8     Martin    159   46    m     ei
## 9      Kadri    164   57    n natuke
## 10 Katariina    148   35    n    jah
## 11     Maria    143   38    n     ei
## 12     Marta    169   55    n     ei
## 13     Madis    156   65    m natuke
## 14    Mihkel    165   69    m natuke
## 15     Tiina    170   38    n    jah
## 16      Miia    145   68    n     ei
## 17      Siim    151   55    m     ei
## 18     Priit    156   63    m     ei
## 19  Kristjan    164   59    m    jah
## 20    Kristi    155   53    n natuke
## 21 Kristiina    158   62    n    jah
## 22     Killu    164   49    n     ei
## 23      Mart    170   69    m     ei
## 24      Kert    143   36    m    jah
## 25      Gert    152   67    m     ei
## 26     Lauri    156   53    m natuke
## 27   Moonika    164   58    n    jah
## 28   Jaanika    165   59    n     ei
## 29    Jaanus    164   63    m natuke
## 30      Jaan    162   65    m    jah

  plot(lapsed$mass, lapsed$pikkus)

  plot(lapsed$mass, lapsed$pikkus, main="Laste masside ja pikkuste joonis",
        xlab="mass (kg)", ylab="pikkus (cm)")

  #http://minitorn.tlu.ee/~jaagup/kool/java/kursused/16/gagr/naited/d/

Värvid vastavalt soole

  plot(lapsed$mass, lapsed$pikkus, col=ifelse(lapsed$sugu=="m", "black", "red"))