I want to create variables which contain the description of the variables in my data, so I have tried to create loop.
for (i in 1:ncol(data)) { nam <- paste