Suppose I have data like the following:
lab <- \"A really really long string!\" dat <- data.frame(grp = paste(1:6,lab),x=1:6,y=runif(6))
