How send a bunch of email from R