My data frame looks like this, but I have hundreds of columns
t1 <- c(11,2,3,4) t2 <- c(10,2,3,4) total1 <- c(8,2,3,4) total2 <- c(4,6,3,4) test <-