Revert "Revert "Create plot4.R""

This reverts commit 44e0797c420489a1534d2d130026d65edbbe76e6.