# Testing Icons and Flags

## Inline Markdown Flags

Here are some flags rendered via Markdown:

- France:
- Germany:
- United States:

## Data Visualization with ggplot2

Below is a simple bar chart using dummy data.

    df_dummy <- data.frame(
      country = c("France", "Germany", "United States", "Japan", "Canada", "United Kingdom"),
      value = c(10, 15, 8, 12, 14, 7)
    )

    ggplot(df_dummy, aes(x = reorder(country, -value), y = value, fill = country)) +
      geom_col() +
      theme_minimal() +
      labs(title = "Dummy Data by Country", x = "Country", y = "Value") +
      theme(legend.position = "none")

## Interactive Flag Grid with ggiraph

This section uses the `show_flags()` function to display an interactive grid of flags.

    show_flags(c("FR", "DE", "US", "JP", "CA", "GB", "IT", "ES"))