visualization.R: attempted fix