assignment due 8/4, 1NN. Comments are in the file.

Actually, the read.csv line is not how I did it. I just looked back at my files and remember that I used the excel Data command to separate it into columns, using ";" as the separator, then resaved it.  THEN the read.csv worked as I wrote it above.  It would have been simpler to do this:
   Ugulino <- read.csv(DataSet_Artigo_SBIA3-SemiColon.csv, sep = ";")