@sivateja

Hi Siva,

Please use the below mentioned function to get the required output without using reshape

### Creating a data set

a <- c(1,2,3)

b <- c(4,5,6)

d <- c(7,8,9)

e <- as.data.frame(cbind(a,b,d))

#####Function to get the desired output ########

datalist = list()

for (i in 1:nrow(e)) {

f <- paste(e$a[i], “,”, e$b[i],",",e$d[i])

datalist[[i]] <- f

}

h <- do.call(rbind, datalist)