persp() накладывает заданную плоскость на существующую поверхность

#r #plot #linear-regression

Вопрос:

У меня есть модель лайнера со многими вариациями

 mod<-lm(ABOTUs~SM PH TIN Aridity SOC TSN TSP CTN CTP NTP ANPP BB Pdiv,data=SFW)
 

Я сделал 3D-сюжет с помощью
persp(mod,TSP~ANPP, scale = TRUE,theta=30, phi=30, ltheta = 50, lphi=20,col = "lightblue",expand = 0.5,shade = 0.5,ticktype = "detailed", zlab = "ABOTUs")

теперь я пытаюсь наложить указанную плоскость на существующую поверхность, но не знаю как.

вот сюжет введите описание изображения здесь