я пытаюсь написать функцию, которая собирает некоторые вызовы, которые я часто использую в сценариях

Я использую данные сна в пакете lme4 в моих примерах

Вот's (упрощенная версия) функции, с которой я начал:

trimModel1