I have data of the following format:
gen = function () sample.int(10, replace = TRUE) x = data.frame(A = gen(), C = gen(), G = gen(), T = gen())
Does this do what you'd like?
Data %>% mutate(SumVar=rowSums(.))