Scatterplot: multiple individual Xs plotted against one Y [duplicate]

Answer 1

Let's say your data is mtcars (built-in) and your one predictor is mpg:

library(ggplot2)
library(reshape2)
mtmelt <- melt(mtcars, id = "mpg")

ggplot(mtmelt, aes(x = value, y = mpg)) +
    facet_wrap(~variable, scales = "free") +
    geom_point()

This is pretty unusual, more commonly you put predictors on the x-axis, but it's what you asked for.

Answer 2

Actually, this a feature plot (featurePlot) in caret, for example, and is common in machine learning. A slightly more general version:

data_set <- diamonds[1:1000, c(1, 5, 6, 7, 8, 9, 10)]
response <- "price"

feature_plot <- function (data_set, response) {
  mtmelt <<- melt(data_set, id = response)
  p <- ggplot(mtmelt, aes(x = value, y = mtmelt[, 1])) +
    facet_wrap(~variable, scales = "free") +
    geom_point() +
    labs(y = response)
  p
}

feature_plot(data_set, response)