Plot[NevilleThetaN[z, 0], {z, -1, 1}]