When you incorrectly use a dataframe rather than a vector in sepCensored, it doesn't fail. It just produces a warning about NAs being introduced by coercion. This should fail immediately.
myvals <- c(10:15, "<6", "<8")
mydata <- data.frame(myvals, 10:17)
sepCensored(mydata)
$numeric_vals
[1] NA NA
$censored
[1] NA NA
Warning message:
In sepCensored(mydata) : NAs introduced by coercion
When you incorrectly use a dataframe rather than a vector in
sepCensored, it doesn't fail. It just produces a warning about NAs being introduced by coercion. This should fail immediately.