Set label
## S4 replacement method for signature 'rule,character' label(x) <- value
x
Object
value
Value to set