s_proportion_logical function

s_function for proportion of TRUE in logical vector