2012-06-07 3 views
0

R에서 각 행이 이전 벡터의 25 행의 합계 인 새 벡터를 생성 할 수있는 명령을 생성하려고했습니다.n 행의 누적 합

이 작업을 수행하기 위해 노력했지만 한 데이터 포인트에 대한 결과를 생성 할 수 있습니다.

나는 내가 가야 할 장소에 놓을 것이다. 이것이 아마도 매우 기본적인 질문이라는 것을 알지만, 제가 고민하고있는 것은 ... 도움이 될 것입니다.

example<-c(1;200) 


fun.1<-function(x) 
{sum(x[1:25])} 

checklist<-sapply(check,FUN=fun.1) 

이렇게하면 모든 값이 NA 인 길이 200의 벡터가 제공됩니다.

아무도 도움을 줄 수 있습니까?

+0

여기서'check' 변수는 무엇입니까? 25 행이 일정하거나 질문을 올바르게 정의해야합니다. 25 행이 동일하다면 '사프'가 필요하지 않습니다. 단지 'rep' 만 실행하면됩니다. – Subs

+0

http://stackoverflow.com/q/7822448/602276과 거의 동일합니다. 페이지 상단에 검색 버튼이 있습니다. '[r] cumulative sum'을 입력하면 매우 비슷한 질문 목록을 얻을 수 있습니다. – Andrie

+1

임베드를 사용하는 솔루션은 아래의 것보다 빠를 것입니다. 폐쇄해야합니다. –

답변

2

귀하의 예를 조금 잡음이 (예, c(1;200) 아마 당신은 당신이 무언가 rep 같은 목록의 목록을하고 싶은 경우, check 변수가없는,이 1:200를 원하거나, 의미가 없습니다, 그것은해야 되었습니다 example 등). 여기

(나는 그것을 이해할 수 있었다뿐만까지) 나는 당신이 아마 필요가 있다고 생각 어떤 코드입니다 :

x <- rep(list(1:200), 5) 
f <- function(y) {y[1:20]} 
sapply(x, f) 

다음에 구체적 제발, 당신은 제출하기 전에 예를 들어 게시 코드를 시도 질문.