PIB = read.csv("DEUDA.csv",header = TRUE) barplot(table(PIB$PIB),main = "Producto Interno Bruto", col = "skyblue4")