Update uppgift3Test.R