https://videosashka.com/watch/YT6OXoTIjOk/conditional-statements-in-r-if-else-if-and-else