library(ggplot2)
openness <- data.frame(
year = c(1990, 1995, 2000, 2005, 2010, 2015, 2020, 2024),
trade_gdp = c(14, 22, 27, 35, 48, 42, 38, 44)
)
ggplot(openness, aes(x=year, y=trade_gdp)) +
geom_line(color="#012169", linewidth=1.5) +
geom_point(color="#012169", size=3) +
geom_area(fill="#012169", alpha=0.1) +
geom_vline(xintercept=1991, linetype="dashed", color="red", linewidth=0.8) +
annotate("text", x=1993, y=16, label="1991\nLiberalisation", color="red", size=3) +
labs(title="India's Trade Openness: (Exports + Imports) / GDP",
subtitle="India has become significantly more open since 1991 liberalisation",
x=NULL, y="Trade / GDP (%)") +
scale_x_continuous(breaks=c(1990,1995,2000,2005,2010,2015,2020,2024)) +
theme_minimal(base_size=11)