`apa_num.integer()` ignores `big.mark`

**Describe the bug**
`apa_num.integer()` ignores `big.mark`

**To Reproduce**

```
 apa_num(7000L, big.mark = ",")
 ```

returns `"7000"`

**Expected behavior**
Should return `"7,000"`.
