R - Объединить много столбцов и оставить несколько

Question

Я хочу объединить такую ​​структуру, удалив NA: У нас есть 8 «блоков» данных с 10 переменными в каждом. Для каждого участника получен полный ответ только на один из этих 8 блоков, т. Е. 10 действительных переменных / участник. -> 80 столбцов

VP Var1 Var 10 Var 11 Var 20 Var 21 Var30 .........

1 & ensp; & ensp; 2 & ensp; & ensp; & ensp; & ensp; & ensp; & ensp; & ensp; & ensp; & ensp; ensp; & ensp; ; & EnSP;

2 & ensp; & ensp; NA & ensp; Н.А. & EnSP; & EnSP; & EnSP; & EnSP; & EnSP; 3 & EnSP; & EnSP; & EnSP; & EnSP; 5 & EnSP; & EnSP; & EnSP; & EnSP; & EnSP; NA & EnSP; & EnSP; & EnSP; NA

3 & ensp; & ensp; NA & ensp; NA & ensp; & EnSP; & EnSP; & EnSP; NA & EnSP; & EnSP; NA & ensp; & ensp; & ensp; & ensp; & ensp; 5 & ensp; & ensp; & ensp; & ensp; & ensp; 4

Финальная версия должна выглядеть так -> 10 столбцов

VP Var1 Var 2 Var 3 Var4 ... Var10

1 & ensp; & ensp; & ensp; & ensp; & ensp; & ensp; 3 & ensp; & ensp; .........

2 & ensp; & ensp; 3 & ensp; & ensp; & ensp; & ensp; 5 & ensp; & ensp; .........

3 & ensp; & ensp; & ensp; & ensp; & ensp; 4 & ensp; ..........

Answer 1

Один из способов добиться этого - вставить функцию, которая будет применена к каждой строке в вызове функции apply. Вы можете заключить вызов apply в вызов data.frame, если хотите.

new.dat <- apply(dat, 1, function(x) return(x[!is.na(x)]))