fiddling with R and maps