I want to create a confusion matrix and need to extract Precision as a vector with the following sample:
true_values <- sample(c("Yes", "No&