레벨에 루프 적용하기

Question

나는 각 팀의 모든 경기에서 플레이어의 퍼포먼스를 포괄하는 스포츠 (EPL) 데이터의 거대한 csv 파일을 가지고 있습니다. 나는 팀이 경기에서 처음으로 득점 한 시간을 비교하기 위해 루프를 돌리고 싶다. (데이터는 First.Goal이다.)

나는 Prem1112라는 CSV에서 리버풀 예컨대, 개별적으로 계산하는 방법을 알고 :

Prem<-read.csv("Prem1112.csv") 

sum(subset(Prem,Team=='Liverpool',First.Goal)) 

가 이상적으로 나는 개별적으로 20 개 팀을 계산하지 않았을 수 있도록 루프를 실행하고 싶습니다. 어떤 아이디어? 이것에 대해

Answer 1

무엇 :

aggregate(First.Goal ~ Team, Prem, sum)