Update `stats-tidy-stat-func-tbl`

__Old sapply:__
```r
cn <- stringr::str_c("sim_number_", cn)
```

__New:__
```r
cn <- paste0("sim_number_", cn)
```

__Old lapply:__
```r
cn <- stringr::str_c("sim_number_", ln)
```

__New:__
```r
cn <- paste0("sim_number_", ln)
```