Skip to main content

Browse the archive

Revision 2ad963b97009de7f1bf46c5da8604388c2c67d05 authored by Matthias Templ on 27 February 2013, 09:44:32 UTC, committed by cran-robot on 27 February 2013, 09:44:32 UTC 
version 1.6.3
1 parent 823295f
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