Skip to main content

Browse the archive

Revision 4f2efb4ed8831a90968ef063d2403d675c84dae3 authored by Matthias Templ on 26 November 2013, 12:55:44 UTC, committed by cran-robot on 26 November 2013, 12:55:44 UTC 
version 1.6.4
1 parent 2ad963b
Raw File
rz.R 
require(robCompositions)
data(expenditures)
xOrig <- x <- expenditures

## DL as negative values
x[x < 350] <- - 350

#impCoda2(x)

## DL given:
#impCoda2(xOrig, dl=c(0, 350, 350, 350, 350))


#imp <- impCoda(x, method='roundedZero')
#imp2 <- alrEM(x, pos=2, dl=rep(5,3))$xImp
back to top