The black lines show up because you use geom_col(color = "black") you can make them the same color as your fill using geom_col(aes(color = comp)). This way they are still there, but not visible. An alternative would be geom_col(color = NA) which would make the borders invisible.