조언을 구하고 싶습니다. 두 목격 (경과) 사이의 시간 차이를 계산하는 데 사용한 .csv 파일이 있습니다. 30 미만의 모든 목격 (경과)을 방문수 1로 표시하고 싶지만 조건이 거짓 (30 이상)이면 방문수를 영구적으로 2 개로 늘려야합니다 ....
데이터 테이블은 다음과 같습니다.
Species Elapsed VisitNo aardvark 5 aardvark 10 aardvark 2 aardvark 30 aardvark 4 aardvark 30 aardvark 10
내가 원하는 것은 다음과 같습니다.
Species Elapsed VisitNo aardvark 5 1 aardvark 10 1 aardvark 2 1 aardvark 30 2 aardvark 4 2 aardvark 30 3 aardvark 10 3
TempVisit <- 1 VisitNo = TempVisit <- ifelse(Elapsed < 30 ,1,TempVisit + 1))
이것은 문장이 거짓이고 다음 줄도 아닌 값을 증가시킬뿐입니다.
미리 감사드립니다.
우리는 cumsum
.
df$VistiNo <- cumsum(df$Elapsed >= 30) + 1
df
# Species Elapsed VistiNo
#1 aardvark 5 1
#2 aardvark 10 1
#3 aardvark 2 1
#4 aardvark 30 2
#5 aardvark 4 2
#6 aardvark 30 3
#7 aardvark 10 3
데이터
df <- structure(list(Species = structure(c(1L, 1L, 1L, 1L, 1L, 1L,
1L), .Label = "aardvark", class = "factor"), Elapsed = c(5L,
10L, 2L, 30L, 4L, 30L, 10L)), class = "data.frame", row.names = c(NA, -7L))
이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.
침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제
몇 마디 만하겠습니다