Добавление комментария @ docendodiscimus в качестве ответа. +1 к нему!
iris %>% mutate(sumVar = rowSums(select(., contains("Sepal"))))