dded plotting.R