All,

How come i=1 in the first case, but i=2 in the second case. The second case
seems to work, but the first case does not.

David.

> findruns <- function(x,k) {
+   n <- length(x)
+   runs <- NULL
+   for (i in 1:(n-k+1)) {
+     if (all(x[i:(i+k-1)]==1)) runs <- c(runs,i)
+     browser(i>1)
+   }
+   return(runs)
+ }
> x=c(1,1,0,0,1,1,1)
> findruns(x,2)
Called from: findruns(x, 2)
Browse[1]> i
[1] 1
Browse[1]> Q
> findruns <- function(x,k) {
+   n <- length(x)
+   runs <- NULL
+   for (i in 1:(n-k+1)) {
+     if (all(x[i:(i+k-1)]==1)) runs <- c(runs,i)
+     if (i>1) browser()
+   }
+   return(runs)
+ }
> findruns(x,2)
Called from: findruns(x, 2)
Browse[1]> i
[1] 2
Browse[1]> 

--
View this message in context: 
http://r.789695.n4.nabble.com/browser-question-tp4636104.html
Sent from the R help mailing list archive at Nabble.com.

______________________________________________
[email protected] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to