Testing for Altruism and Social Pressure in Charitable Giving