Thank you so much!!
The coordinates z and x of each point has to be in curly brackets, like below:
un = Table[ { { z[[i]], x[[i]] }, vunorm[[i]] }, {i, 1, Length[vunorm] } ]
