I am running the variance partitioning function in vegan (varpart). I get the following graph. If you sum them up the total variance reported in the plot is more than 100%. I would expect to be 100-22.6 (residual). If anyone has an idea would be very helpful. Thank you!

here is the code I am using

spe.part.all <- varpart(carb, env.ftp, env.ftm, env.loc)
                       spe.part.all$part 
                       
                       plot(spe.part.all,
                            Xnames = c("FT_PLANT", "MICRO_FG","SOIL_CLIMATE" ), # name the partitions
                            bg = c("seagreen3", "mediumpurple"), alpha = 80, # colour the circles
                            digits = 2, # only show 2 digits
                            cex = 1.5)
                       

plot variance partitioning