library(ggplot2)
d <- mtcars
d$x <- rownames(mtcars)
ggplot(d, aes(x, mpg)) + geom_point()

ggplot(d, aes(x, mpg)) + geom_point() + theme(axis.text.x = element_text(angle = 90, 
    hjust = 1))