added old stuff from ggplot reshape tutorial,