search for: addlegend

...stake. However, even with when I generate a map for the whole world using: eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score",colourPalette=colourPalette, catMethod="fixedWidth", missingCountryCol = "white", addLegend=FALSE) And then use: do.call(addMapLegend, c(eps, legendLabels="none", arrows(-100,-140,100,-140,code=3))) Only a legend with the colours is generated, no arrows. My session info is below. Thanks again! R version 3.2.4 (2016-03-10) Platform: x86_64-apple-darwin13.4.0 (64-bit) Running...

...plot a map of Europe: eps_europe <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score - Europe",colourPalette=colourPalette, catMethod="fixedWidth", missingCountryCol = "white", mapRegion="Europe", addLegend=FALSE) The following command does not seem to add the arrow. What am I doing wrong? do.call(addMapLegend, c(eps_europe, legendLabels="none", arrows(-100,-140,100,-140,code=3))) Thank you again. I really appreciate it. Sincerely, Milu On Sat, Apr 9, 2016 at 12:20 PM, Jim Lemon <dr...

...when I generate a map for the whole world using: >> >> eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score",colourPalette=colourPalette, >> catMethod="fixedWidth", missingCountryCol = "white", addLegend=FALSE) >> >> And then use: >> >> do.call(addMapLegend, c(eps, legendLabels="none", arrows(-100,-140,100,-140,code=3))) > > I do get an arrow using same version of R and OSX. See attached. (I think that png images will be accepted by the mailserver.) Nope...

...e world using: > >>> > >>> eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS > Score",colourPalette=colourPalette, > >>> catMethod="fixedWidth", missingCountryCol = > "white", addLegend=FALSE) > >>> > >>> And then use: > >>> > >>> do.call(addMapLegend, c(eps, legendLabels="none", > arrows(-100,-140,100,-140,code=3))) > >> > >> I do get an arrow using same version of R and OSX. See attached. (I > thin...

...even with when I generate a map for the whole world using: > > eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score",colourPalette=colourPalette, > catMethod="fixedWidth", missingCountryCol = "white", addLegend=FALSE) > > And then use: > > do.call(addMapLegend, c(eps, legendLabels="none", arrows(-100,-140,100,-140,code=3))) I do get an arrow using same version of R and OSX. See attached. (I think that png images will be accepted by the mailserver.) -- David. > > Only a...

...> > >>> > > >>> eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS > Score",colourPalette=colourPalette, > > >>> catMethod="fixedWidth", missingCountryCol = > "white", addLegend=FALSE) > > >>> > > >>> And then use: > > >>> > > >>> do.call(addMapLegend, c(eps, legendLabels="none", > arrows(-100,-140,100,-140,code=3))) > > >> > > >> I do get an arrow using same version of R and O...

...gt; > eps_europe <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS > Score - Europe",colourPalette=colourPalette, > catMethod="fixedWidth", missingCountryCol = > "white", mapRegion="Europe", addLegend=FALSE) > > The following command does not seem to add the arrow. What am I doing wrong? > > do.call(addMapLegend, c(eps_europe, legendLabels="none", > arrows(-100,-140,100,-140,code=3))) > Your earlier question had a full world map. That was the context for Jim's...

...r the whole world using: > >>> > >>> eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score",colourPalette=colourPalette, > >>> catMethod="fixedWidth", missingCountryCol = "white", addLegend=FALSE) > >>> > >>> And then use: > >>> > >>> do.call(addMapLegend, c(eps, legendLabels="none", arrows(-100,-140,100,-140,code=3))) > >> > >> I do get an arrow using same version of R and OSX. See attached. (I think that png...

...rate a map for the whole world using: >>> >>> eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score",colourPalette=colourPalette, >>> catMethod="fixedWidth", missingCountryCol = "white", addLegend=FALSE) >>> >>> And then use: >>> >>> do.call(addMapLegend, c(eps, legendLabels="none", arrows(-100,-140,100,-140,code=3))) >> >> I do get an arrow using same version of R and OSX. See attached. (I think that png images will be accepted by...

...h 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...

...ld using: > > >>> > > >>> eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score",colourPalette=colourPalette, > > >>> catMethod="fixedWidth", missingCountryCol = "white", addLegend=FALSE) > > >>> > > >>> And then use: > > >>> > > >>> do.call(addMapLegend, c(eps, legendLabels="none", arrows(-100,-140,100,-140,code=3))) > > >> > > >> I do get an arrow using same version of R and OSX. S...

...a'),] # EPS colourPalette <- rev(brewer.pal(7, "RdYlGn")) eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score",colourPalette=colourPalette, catMethod="fixedWidth", missingCountryCol = "white", addLegend=FALSE) do.call(addMapLegend, c(eps, legendLabels="all", legendWidth=0.5)) Instead of adding numeric based legend, I would like to add a two-headed arrow with some text. I would be grateful for any help. Thank you! Sincerely, Milu [[alternative HTML version deleted]]

...>>> > > > >>> eps <- mapCountryData(n, nameColumnToPlot="eps_score", > mapTitle="EPS Score",colourPalette=colourPalette, > > > >>> catMethod="fixedWidth", missingCountryCol = > "white", addLegend=FALSE) > > > >>> > > > >>> And then use: > > > >>> > > > >>> do.call(addMapLegend, c(eps, legendLabels="none", > arrows(-100,-140,100,-140,code=3))) > > > >> > > > >> I do get an arrow...

...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=TR...

...alette <- rev(brewer.pal(7, "RdYlGn")) > > eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS > Score",colourPalette=colourPalette, > catMethod="fixedWidth", missingCountryCol = "white", > addLegend=FALSE) > do.call(addMapLegend, c(eps, legendLabels="all", legendWidth=0.5)) > > Instead of adding numeric based legend, I would like to add a two-headed > arrow with some text. I would be grateful for any help. Thank you! > > Sincerely, > > Milu > > [...

...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.40...

Hi Milu, I just realized that by "the bottom of the map" you may mean "beneath the map", in which case you should use: par(xpd=TRUE) arrows(...) par(xpd=FALSE) Jim On Mon, Apr 11, 2016 at 11:50 PM, Miluji Sb <milujisb at gmail.com> wrote: > Dear David, > > Thank you very much for your replies! I didn't know about par('usr'). > > I get

..._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 >> > &gt...