Rozdzielanie interakcji wieloskalowych

W poprzednim ćwiczeniu dopasowano następujący model:

tensor_mod <- gam(cadmium ~ te(x, y, elev), 
                  data = meuse, method = "REML")

W tym ćwiczeniu dopasowujesz model z wygładzeniami i tensorowymi interakcjami, aby oddzielić od siebie niezależne i interakcyjne efekty zmiennych.

Przekształć powyższy model tak, aby x i y oddziaływały na tej samej skali, efekt elev był osobnym wygładzeniem, a interakcja wszystkich trzech zmiennych na różnych skalach stanowiła odrębny człon.
Podsumuj model i zwizualizuj go.