powered by
getP(x) getX(x) sign(x) <- value
sign<-()
brob
x <- as.brob(-10:10) sign(x) <- TRUE
Run the code above in your browser using DataLab