doRedundancyAnalysis function

Do a redundancy analysis