R BQUOTE Subscript

# Use brackets to subscrpt:

bquote(text[sub])
2Bowls