Skip to content
Prev 307929 / 398525 Next

transforming a .csv file column names as per a particular column rows using R code

Hello,

Try the following.

dta1 <- read.csv( text=
"Tool,Step_Number,Data1,Data2
A,1,0,1
A,2,3,2
A,3,2,3
B,1,3,2
B,2,1,2
B,3,3,2
")

sp <- split(dta1[-2], dta1$Tool)
dta2 <- do.call(rbind, lapply(sp, function(x) as.vector(unlist(t(x)))))
dta2 <- data.frame(dta2, stringsAsFactors = FALSE)
idx <- rep(c(FALSE, TRUE, TRUE), ncol(dta2) %/% 3)
dta2[, idx] <- sapply(dta2[, idx], as.integer)


Hope this helps,

Rui Barradas
Em 14-10-2012 17:13, siddu479 escreveu: