R/rm_facets_string_part_extract.R

Defines functions rm_facets_string_part_extract

## File Name: rm_facets_string_part_extract.R
## File Version: 0.06

rm_facets_string_part_extract <- function( x, split, part)
{
    vec <- strsplit( paste(x), split=split )
    vec <- unlist( lapply( vec, FUN=function(vv){ vv[part] } ) )
    return(vec)
}
alexanderrobitzsch/sirt documentation built on Sept. 8, 2024, 2:45 a.m.