add R scripts
add plots