Federer vows to investigate