plot PolyLog[2,x] for x from -1 to 1