### standard examples
  x <- 4
  x %+=% 4
  x
  
  ### XML examples with the R4X package
  ## Not run: 
#     require("R4X")
#     x <- xmlNode( "test" )
#     x %+=% '<foo><bar/></foo>'
#     x
#   ## End(Not run)
  
Run the code above in your browser using DataLab