principal components decomposition

[Tony_iberian]

https://robjhyndman.com/hyndsight/fbtsa/

I´m running the following code in a quarto document
{r}
library("fpp3")
library("writexl")

Compute features

tourism_features <- tourism %>%
features(Trips, feature_set(pkgs="feasts"))

{r}
pcs <- tourism_features %>%
select(-State, -Region, -Purpose) %>%
prcomp(scale=TRUE) %>%
augment(tourism_features)

pcs %>%
ggplot(aes(x=.fittedPC1, y=.fittedPC2, col=Purpose)) +
geom_point() + theme(aspect.ratio=1)

---

i get this error
**Error in UseMethod("augment") : **
no applicable method for 'augment' applied to an object of class "prcomp"

^{Referred here by Forecasting: Principles and Practice, by Rob J Hyndman and George Athanasopoulos}

[robjhyndman]

This happens when you haven't loaded the appropriate packages. In this case, augment.prcomp is part of the broom package. So you could load that using

library(broom)

But if you copied my post accurately, it would have worked. At the very top of that post, I include the following R chunk.

library("tidyverse")
library("tsibble")
library("feasts")

Although that doesn't load broom explicitly, the tidyverse package will use the relevant broom function when called.

[Tony_iberian]

Many thanks Dr Rob

I wrongly assumed that fpp3 library would load those packages fully.