R print один элемент вектора

Question

Это вопрос программирования. Я не понимаю, как распечатать 1 элемент вектора. Мой код приведен ниже:

# creating a range of values to test for accuracy 
thresh=seq(0,1,by=0.05) 
acc = matrix(0,1,20) 
# computing accuracy for different threshold values from 0 to 1 step by 0.05 
for (i in 1:21){ 
    matrix = confusion.matrix(obs,pred,threshold=thresh[i]) 
    acc[i]=(matrix[1,1]+matrix[2,2])/nrow(test) 
    acc[i]} 
max(acc) 
library(nnet) 
which.is.max(acc) 
acc 
#Q how can I print only thresh[12] the first max(acc)? 
    there may be more than one thresh with the max(acc). 
print(thresh) 

????

Answer 1

Если я понимаю, о чем вы спрашиваете, это должно сработать. Вот простой пример.

a <- c(1,2,3,3) 
thresh <- c(1,2,3,4) 

# run at command line 
> thresh[a==max(a)] 
    [1] 3 4