Update CreateMapTable.r

# Comment 5  from Juergen on 10/1/14 in "Juergen" branch (and deleted Comment #4)