Libraries

library(wateReview)

Survey statistics

df <- read_survey_df(system.file("extdata", "Water Management in Latin America_edit.csv", package = "wateReview"))
df <- filter_columns(df, colname_list = c("Position", "Affiliation", "Years", "Discipline", "Country_current", "Publications", "Journals", "Funding"))
countries <- get_countries(df)

for (country in countries) {
    cat('\n##', country, '\n')
    df_country <- filter_by_country(country = country)
    df_country <- melt_df_country(df_country)
    plot_df_country(df_country, title_text = country)
    cat('\n')
}

Argentina

Bahamas

Barbados

Belize

Bolivia

Brazil

Canada

Chile

Colombia

Costa Rica

Cuba

Dominican Republic

Ecuador

El Salvador

French Guiana

Guatemala

Jamaica

Martinique

Mexico

Other

Panama

Paraguay

Peru

Puerto Rico

Trinidad & Tobago

United States

Uruguay

Venezuela

Virgin Islands