Fatih,
You did not provide details on what V1 and V2 represent. However if we assume that they are continuous covariates, the function 'betaTest' in RRPP may be what you are looking for.
This function performs tests on coefficients using RRPP. One can test the coefficients against zero (the 'standard' test of coefficients), or one could specify the coefficients of the null model against which to compare the observed. The latter is similar in
spirit to the approach of Cicuéndez et al. (2023) who used RRPP for evaluating allometry relative to the isometry vector (rather than the zero vector).
In your case, you could compare coefficients from the V1 model to the V2 model. This is essentially evaluating whether the direction of the coefficient vectors are concordant. A simple example is below (and the help file provides details and citations).
### EXAMPLE
library(geomorph)
data("PlethMorph")
PlethMorph$Y <- cbind(PlethMorph$HeadLength, PlethMorph$TailLength)
fit1 <- lm.rrpp(Y ~ SVL,
data = PlethMorph,
verbose = TRUE)
fit2 <- lm.rrpp(Y ~ BodyWidth,
data = PlethMorph,
verbose = TRUE)
Test1 <- betaTest(fit1,
coef.no = 2, Beta = coef(fit2)[2,])
summary(Test1)
###
Hope this helps.
Dean
--
Dr. Dean C. Adams
Distinguished Professor
Director, Ecology and Evolutionary Biology Graduate Program
Department of Ecology, Evolution, and Organismal Biology
Iowa State University