Dear Jim,
Thanks again! I do want the arrows at the bottom (beneath the map). This is
what I am doing:
# Draw the map
eps_europe <- mapCountryData(n, nameColumnToPlot="eps_score",
mapTitle="EPS
Score - Europe",colourPalette=colourPalette,
catMethod="fixedWidth", missingCountryCol = "white",
mapRegion="Europe",
addLegend=FALSE)
# ISO3 codes on the map
text(n, labels="ISO3", cex=0.30)
# Obtain coordinates for the arrow
par('usr')
# -19.75966 54.75966 33.60000 71.40000
# Arrows
par(xpd=TRUE)
arrows(-19.75966, 54.75966, 33.60000, 71.40000,code=3)
par(xpd=FALSE)
As the output shows I cannot seem to get the correct coordinates for the
arrows. Thanks again.
Sincerely,
Milu
-------------- next part --------------
A non-text attachment was scrubbed...
Name: myplot.pdf
Type: application/pdf
Size: 116608 bytes
Desc: not available
URL:
<https://stat.ethz.ch/pipermail/r-help/attachments/20160412/d53f8072/attachment.pdf>
Hi Milu, There is a two-headed arrow on the image you sent, and it seems to be where you specified. Did you want it beneath the map, as: par(xpd=TRUE) arrows(-22,54.75,-22,74,code=3) par(xpd=FALSE) Jim On Tue, Apr 12, 2016 at 7:58 PM, Miluji Sb <milujisb at gmail.com> wrote:> Dear Jim, > > Thanks again! I do want the arrows at the bottom (beneath the map). This is > what I am doing: > > # Draw the map > eps_europe <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS > Score - Europe",colourPalette=colourPalette, > catMethod="fixedWidth", missingCountryCol = "white", mapRegion="Europe", > addLegend=FALSE) > > # ISO3 codes on the map > text(n, labels="ISO3", cex=0.30) > > # Obtain coordinates for the arrow > par('usr') > > # -19.75966 54.75966 33.60000 71.40000 > > # Arrows > par(xpd=TRUE) > arrows(-19.75966, 54.75966, 33.60000, 71.40000,code=3) > par(xpd=FALSE) > > As the output shows I cannot seem to get the correct coordinates for the > arrows. Thanks again. > > Sincerely, > > Milu
Hello Jim, Thanks again. I am getting the two-headed arrow but I cannot seem to get the coordinates right for the arrow to appear beneath the map. These coordinates puts the arrow on the left hand side. Thanks again! Sincerely, Milu On Tue, Apr 12, 2016 at 1:15 PM, Jim Lemon <drjimlemon at gmail.com> wrote:> Hi Milu, > There is a two-headed arrow on the image you sent, and it seems to be > where you specified. Did you want it beneath the map, as: > > par(xpd=TRUE) > arrows(-22,54.75,-22,74,code=3) > par(xpd=FALSE) > > Jim > > On Tue, Apr 12, 2016 at 7:58 PM, Miluji Sb <milujisb at gmail.com> wrote: > > Dear Jim, > > > > Thanks again! I do want the arrows at the bottom (beneath the map). This > is > > what I am doing: > > > > # Draw the map > > eps_europe <- mapCountryData(n, nameColumnToPlot="eps_score", > mapTitle="EPS > > Score - Europe",colourPalette=colourPalette, > > catMethod="fixedWidth", missingCountryCol = "white", mapRegion="Europe", > > addLegend=FALSE) > > > > # ISO3 codes on the map > > text(n, labels="ISO3", cex=0.30) > > > > # Obtain coordinates for the arrow > > par('usr') > > > > # -19.75966 54.75966 33.60000 71.40000 > > > > # Arrows > > par(xpd=TRUE) > > arrows(-19.75966, 54.75966, 33.60000, 71.40000,code=3) > > par(xpd=FALSE) > > > > As the output shows I cannot seem to get the correct coordinates for the > > arrows. Thanks again. > > > > Sincerely, > > > > Milu >-------------- next part -------------- A non-text attachment was scrubbed... Name: myplot.pdf Type: application/pdf Size: 113072 bytes Desc: not available URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20160412/745a323a/attachment.pdf>