rwish function

Sample from the Wishart Distribution