Update gfilter.R