vec <- c(1,2,3,4,4,4,5,5,4,3,NaN,3,2,1)
workflowlist_part <- list(max_return_elements=1)
resultlist <- qat_call_noc_rule(vec, workflowlist_part,element=1)
savelist <- qat_call_save_noc_rule(resultlist[[2]])
Run the code above in your browser using DataLab