rautologistic function

Return a perfect sample from a centered autologistic model.