Add status info from the lp solver to output

[edwindj]

Thx to Sander Scholtus

[edwindj]

In development version this is activated:

library(errorlocate)

## Loading required package: validate

# super simple example
rules <- validator( x > 1)
d <- data.frame( x = c(0,1,2,-1))
d

##    x
## 1  0
## 2  1
## 3  2
## 4 -1

el <- locate_errors(d, rules)

el$duration

## [1] 0.06847143 0.07108474 0.00000000 0.05565333

el$status

## [1] 0 0 0 0

# impossible system (contradicting rules)
rules <- validator( x > 1, x < -1)
d <- data.frame( x = 0 )
el <- locate_errors(d, rules)
el$status

## [1] 2

[edwindj]

Is added to errorlocation: $status and $duration