a <- 0.6875
estFj <- c(-0.8231686, 0.1237904, 1.1967068, 1.3772572)
#What I tried so far is:
for(i in estFj) {
if (i >= a) {
t = c(i)
}
}
t
But it only gives the value of 1.3772572 whereas I need all the values of estFj greater than or equal to a and then find the minimum of these values that are greater than or equal to a!
How do I fix this?