omaRound <- function(num) {
# Py<50>rist<73><74> luvun num 1 desimaalin tarkkuuteen
num <- num * 10
num <- round(num)
num2 <- num / 10
return(num2)
}
