r code for logical indexing from string
Merge branch 'syounkin'