```
# NOT RUN {
data(product_test)
calc_cro_cpct(product_test, mrset(a1_1 %to% a1_6))
# same result
calc_cro_cpct(product_test, mrset_f(a1_))
# same result
calc_cro_cpct(product_test, mrset_p("a1_"))
# same result
calc_cro_cpct(product_test, mrset_t("a1_{1:6}"))
# }
```

Run the code above in your browser using DataCamp Workspace