leaflet

Touristic attractions in Rio de Janeiro

These are the main touristic attraction in Rio de de Janeiro city. The description was copied from their respective entries in Wikipedia.

• Christ the Redeemer - an Art Deco statue of Jesus Christ created by French sculptor Paul Landowski and built by the Brazilian engineer Heitor da Silva Costa, in collaboration with the French engineer Albert Caquot. Constructed between 1922 and 1931, the statue is 30 metres (98 ft) tall, excluding its 8-metre (26 ft) pedestal. The arms stretch 28 metres (92 ft) wide.
• Copacabana Beach - is a bairro (neighbourhood) located in the South Zone of the city. It is known for its 4 km (2.5 miles) balneario beach, which is one of the most famous in the world.
• Sugarloaf Mountain - is a peak at the mouth of Guanabara Bay on a peninsula that juts out into the Atlantic Ocean. Rising 396 m (1,299 ft) above the harbor, its name is said to refer to its resemblance to the traditional shape of concentrated refined loaf sugar. It is known worldwide for its cableway and panoramic views of the city.

Click on the flags below to see a link to their Wikipedia definitions.

library("leaflet")
df<- data.frame(lat=c(-22.951944,-22.948611,-22.966944),
                lng=c(-43.210556,-43.157222,-43.180556))
icon<-makeIcon(
    iconUrl="http://icons.iconarchive.com/icons/custom-icon-design/round-world-flags/96/Brazil-icon.png",
    iconWidth=31*215/230,
    iconHeight = 31,
    iconAnchorX = 31*215/230/2,
    iconAnchorY = 16 )
sites<-c("<a href='https://en.wikipedia.org/wiki/Christ_the_Redeemer_(statue)'>Christ Redeemer</a>",
         "<a href='https://en.wikipedia.org/wiki/Sugarloaf_Mountain'>Sugarloaf Mountain</a>",
         "<a href='https://en.wikipedia.org/wiki/Copacabana,_Rio_de_Janeiro#Copacabana_Beach'>Copacabana Beach</a>")
leaflet(df) %>%
    addTiles() %>%
    addMarkers(popup=sites,icon=icon)