Classification by row

Question

I want to make a classification of my dataframe of which here is an extract. Indeed on each row I want to classify the columns.

require(tidyverse)
df <-