Zaczynam od 3 dużych tabel danych (nazwanych A1, A2, A3). Każda tabela ma 4 kolumny danych (V1-V4), 1 kolumnę „Data”, która jest stała we wszystkich trzech tabelach i tysiące wierszy.

Oto kilka fałszywych danych, które przybliżają moje tabele.

A1.V1<-c(1,2,3,4)
A1.V2<-c(2,4,6,8)
A1.V3<-c(1,3,5,7)
A1.V4<-c(1,2,3,4)


A2.V1<-c(1,2,3,4)
A2.V2<-c(2,4,6,8)
A2.V3<-c(1,3,5,7)
A2.V4<-c(1,2,3,4)


A3.V1<-c(1,2,3,4)
A3.V2<-c(2,4,6,8)
A3.V3<-c(1,3,5,7)
A3.V4<-c(1,2,3,4)

Date<-c(2001,2002,2003,2004)

DF<-data.frame(Date, A1.V1,A1.V2,A1.V3,A1.V4,A2.V1,A2.V2,A2.V3,A2.V4,A3.V1,A3.V2,A3.V3,A3.V4)

Tak wygląda moja ramka danych:

  Date A1.V1 A1.V2 A1.V3 A1.V4 A2.V1 A2.V2 A2.V3 A2.V4 A3.V1 A3.V2 A3.V3 A3.V4
1 2001     1     2     1     1     1     2     1     1     1     2     1     1
2 2002     2     4     3     2     2     4     3     2     2     4     3     2
3 2003     3     6     5     3     3     6     5     3     3     6     5     3
4 2004     4     8     7     4     4     8     7     4     4     8     7     4

Moim celem jest obliczenie średniej wiersza dla każdej pasującej kolumny z każdej tabeli danych. Tak więc w tym przypadku chciałbym, aby środki wiersza dla wszystkich kolumn kończących się na V1, wszystkie kolumny kończące się na V2, wszystkie kolumny kończące się na V3 i wszystkie kolumny kończące się na V4.

Wynik końcowy wyglądałby tak

      V1  V2  V3  V4
2001   1   2   1   1
2002   2   4   3   2
2003   3   6   5   3
2004   4   8   7   4

Więc moje pytanie brzmi: jak przejść do obliczania środków wierszowych w oparciu o częściowe dopasowanie nazwy kolumny?

Dzięki