Is this what you mean?
library(ggplot2)
library(scales)
# Sample data on a copy/paste friendly format
sample_df <- data.frame(
stringsAsFactors = FALSE,
Country = c("Algeria","Cabo Verde",
"Swaziland","Botswana","Namibia","Sao Tome"),
percent = c(6.520605e-07,9.423077e-05,
0.000488189,0.0004694836,0.003836207,0.08947368)
)
ggplot(sample_df, aes(x = Country, y = percent)) +
geom_col() +
scale_y_continuous(labels = percent_format())
Created on 2020-03-19 by the reprex package (v0.3.0.9001)
If you need more specific help, please provide a proper REPRoducible EXample (reprex) illustrating your issue.