Revert "Revert "Create plot4.R""

This reverts commit 31329839ba6d57f71cc8c74423a03208e70cf97d.