Visualization of R language nutrient dataset

stay flexclust Nutrition data set in package , It includes the right to 27 Seed meat 、 Measurement of nutrients in fish and poultry

energy Food energy （ calories ）.
protein protein （ g ）.
fat fat （ g ）.
calcium calcium （ mg ）.
iron iron （ mg ）.

Whether there are missing values in the dataset

data(nutrient, package="flexclust") 
library(VIM )
aggr(nutrient, prop=FALSE, numbers=TRUE)

People often say that the more fat , The more energy food has , Is this right ？

ggplot(nutrient) +
  aes(x = energy , y = fat) + 
  geom_point()   + stat_smooth()

The more fat , The more energy food has , The scatter plot tells you that this is the right view

library(ggcorrplot)
nutrient %>%
  cor() %>%
  round(2) %>%
  ggcorrplot(hc.order = TRUE,lab = TRUE)