edit storm.R. figure 1:dot plots