I am having trouble using the paste function. I have 12 plots and I want to replace the title, x and y label for each plots by the column names of the x and y matrices.

for (i in 1:ncol(y)) {
scatter.smooth(
x[, 1],
y[, i],
main = paste(colnames(y[, i]) "vs" colnames(x[, 1])),
xlab = paste(colnames(x[, 1])),
ylab = paste(colnames(y[, i])))

This is the error:
atterns.R:33:33: unexpected string constant
32: y[, i],
33: main = paste(colnames(y[, i]) "vs"