Update gsub-dataframe.R

add matrix ability