foo = function(x) { stride = nrow(x) for(i in 1:nrow(x)) for(j in 1:ncol(x)) { if(x[i + j * stride] == 3) ctr = ctr + 1 } }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.