s <- "Lorem ipsum dolor sit amet, consectetur adipisicing elit."
if (stri_install_check(silent=TRUE))
stri_count_fixed(s, "")
if (stri_install_check(silent=TRUE))
stri_count_fixed(s, "o")
if (stri_install_check(silent=TRUE))
stri_count_fixed(s, "it")
if (stri_install_check(silent=TRUE))
stri_count_fixed(s, letters)
if (stri_install_check(silent=TRUE))
stri_count_fixed("babab", "b")
if (stri_install_check(silent=TRUE))
stri_count_fixed(c("stringi", "123"), "string")
Run the code above in your browser using DataLab