https://yannickbijl.github.io/posts/short-booleans-in-r/