WIP: glm denoise in R