which() の戻り値と論理ベクトルによる添字指定を混同するとずれる

which(条件)は条件を満たす要素の「位置（添字番号）」を返しますが、条件そのもの（論理ベクトル）を直接添字として使うのとは意味が違います。

 1  temps <- c(18, 25, NA, 30, 12)
 2  hot <- temps[_________________]
                         ^
 3  cat(hot, "\n")

出力: 25 NA 30

空欄を埋めて実行を通す

which()の結果をさらに論理ベクトルとして使うと、位置の数値がTRUE/FALSEとして解釈され、意図と違う要素が選ばれます。