Как записать файл CSV, используя существующий файл CSV значения

Question

У меня есть файл Csv который выглядит как

name day  value 
anji  1  10 
anji  2   6 
aru  1   8 
aru  2   5 

Я хочу, чтобы получить выход моего нового файла CSV в

name day1  day2 
anji 10  6 
aru  8  5 

Answer 1

Вы можете использовать spread из tidyr или reshape от базовой R.

xy <- read.table(text = "name day  value 
anji  1  10 
       anji  2   6 
       aru  1   8 
       aru  2   5", header = TRUE) 

library(tidyr) 
out <- spread(data = xy, key = day, value = value) 

# or 
out <- reshape(xy, idvar = "name", timevar = "day", direction = "wide") 

    name 1 2 
1 anji 10 6 
2 aru 8 5 

write.table(out, file = "myfile.csv", sep = ",", 
      col.names = TRUE, row.names = FALSE)