Skip to content
Prev 140476 / 398506 Next

Re place with previous value

Maybe something like:

f <- function(x,y) ifelse(sign(y[x])==-1,return(y[x-1]), return(y[x]))
test[,3] <- sapply(seq_along(test[,3]),f,test[,3])
Ravi S. Shankar wrote: