## LPP2005REC -
# Load Swiss Pension Fund Data:
LPP <- LPP2005REC
head(LPP)
## assetsHistPairsPlot -
# Create a bivariate Binning Plot: assetsHistPairsPlot -
assetsHistPairsPlot(LPP[, c("LMI", "ALT")])
## assetsHistPairsPlot -
# Now with hexagonal Bins:
assetsHistPairsPlot(LPP[, c("LMI", "ALT")], method = "hex")
grid(col="red")
Run the code above in your browser using DataLab