Ora, os polinômios ortogonais não usam x tal como ele é mas sim uma base ortogonal sobre ele, obtida por transformações lineares, cujos coeficientes são fornecidos nas páginas finais de alguns livros. É por isso que eles são ortogonais, pois o produto interno entre os graus dá zero. Veja a matriz do modelo, que só tem valores não nulos na diagonal.
X <- model.matrix(modelo3)
round(t(X)%*%X,2)
À disposição.
Walmes.