Аборт, Роберт Сапольски