Update CreateMapTable.r

# Comment 2 from Juergen on 10/1/14 in "Juergen" branch