Calcule um modelo para prever o log de compartilhamentos com todas as outras variáveis. Armazene-o como mod1.
Crie um novo dataframe dataNewsComponents com o log de compartilhamentos e os valores nos 6 primeiros componentes. O objeto pcaNews novamente contém os resultados do PCA.
Calcule um segundo modelo (mod2) que prevê o log de compartilhamentos usando apenas os 6 componentes.
Compare o R quadrado ajustado dos modelos. Como o valor mudou ao usar apenas os componentes principais? Quão bom está o seu modelo?

Escolhendo o número certo de componentes principais