Crafted acceptable substitute to layout by modifying hist() plot