Update combinetables.R

question answered :)