# NOT RUN {
opts <- c( '--foo', 'bar' )
opt_get('foo')
opt_get( c('foo'), opts=opts )
opt_grab( c('--foo'), opts=opts )
opt_get_ms( c('foo'), opts=c('/foo', 'bar' ) )
opt_get_java( c('foo'), opts=c('-foo', 'bar' ) )
# Using pipes:
# }
# NOT RUN {
c('foo', 'f') %>% opt_get('bar')
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab