R/oppg6.3.R

In SiljeHermansen/laerdegR: Stottepakke Til "Laer Deg R"

Defines functions oppg6.3

Documented in oppg6.3

oppg6.3<-function(){
  #Last inn data
  data(kap6, envir = environment())
  kap6 <- kap6

  #Opprett vektor:
  ifelse(kap6$Utdanning<15, "lav", "hoy")

}