I\'m currently trying to develop a similar result as this link. I have a significant number of columns and several different labels for the x-axis.
col1 <-
