How to check redundancy of variable and reduce data dimension

Dear all,

Do you know how to check redundancy of variables and reduce the dimension in R? 
It seems PCA can do this. Is there any other better way to implement in R? Many 
thanks!

Bill