R在符号更改之前标识行

ada*_*888 7 r

我有一个矢量:

df <- c(5,9,-8,-7,-1)
Run Code Online (Sandbox Code Playgroud)

如何在更改符号之前识别位置?即df[2]

Jos*_*ich 14

这很简单,如果你知道这个sign功能......

which(diff(sign(df))!=0)
# [1] 2
Run Code Online (Sandbox Code Playgroud)