colnames(dataset) <- c('name1','name2',..)
colnames(df)[colnames(df) == "name"] <- "new_name"
R> colnames(X)[2] <- "superduper"