Is it correct to do the intervals?
20-35k-35-50k-50-70k-70k+
my_data$Löneutfall <- ifelse(my_data$Löneutfall<=20000,1,
ifelse(my_data$Löneutfall>=20001 & my_data$Löneutfall<=35000,2,
ifelse(my_data$Löneutfall<35000,3, ifelse(my_data$Löneutfall>=35000, 4,
ifelse(my_data$Löneutfall<50000,5, ifelse(my_data$Löneutfall<60000,7,
ifelse(my_data$Löneutfall<70000,8, ifelse(my_data$Löneutfall<70000 +, 9))))