Я добавил аргумент дополнения и изменил некоторые имена и назвал его shift. https://github.com/geneorama/geneorama/blob/master/R/shift.R
shift