Fix a small bug in pelos.R

Correct coordinate of "initial.value" in return value.