Plot[ModularLambda[I + z], {z, -1, 1}]