Со многими строками это может быть более эффективным:
do.call(pmax, X[c("x","y","z")]) > 4
По вашим данным
ex <- data.frame(
Sample = c("S1", "S2", "S3", "S4", "S5"),
x = c(-0.3, 0.4, 1.2, 4.3, 2.4),
y = c( 5.3, 0.2,-0.6, 0.7, 4.3),
z = c( 2.5,-1.2, 3.2, 5.7, 2.3)
)
do.call(pmax, ex[c("x","y","z")]) > 4
# [1] TRUE FALSE FALSE TRUE TRUE