ПримеR. Регрессия пик плато байесовский подход в R